В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История

Что не правильно в этой программе? надо найти среднее арифметическое нечетных чисел. в этой строке (i: =i+1; ) пишет нельзя изменять значение переменной цикла внутри этого цикла program p1; var k: array [1..40] of integer; i,s: integer; sr: real; begin for i: = 1 to 40 do k[i]: = random(21)+0; writeln; for i: = 1 to 40 do write(k[i], ' '); s: =0; i: =0; writeln; for i: = 1 to 40 do if k[i] mod 2=1 then begin s: = s+k[i]; i: =i+1; sr: = s/i; end; write(sr); end.

Показать ответ
Ответ:
Miller2005
Miller2005
04.10.2020 15:50
Правильно пишет. В цикле for счётчик индексируется автоматически. Вручную его менять нельзя. В твоем цикле i является счетчиком цикла и одновременно еще и счетчиком нечетных элементов. Это недопустимо. Замени i на j например или другую букву для подсчета количества нечетных элементов.
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота