Составить программку вычисления среднего арифметического значение четных по значению элементов

Составить программку вычисления среднего арифметического значение четных по значению частей массива. Элементы нумеруются с 0 до 49 и задаются с поддержкою датчика случайных чисел из спектра [0,300]

Задать свой вопрос
1 ответ
Var a: array[0..49] of Integer; sr:real;sum,i,n: integer;beginwriteln('Начальный массив');for i:=0 to 49 do begina[i]:=Random(300);write(a[i]:4);if a[i] mod 2 = 0 then begin sum:= sum + a[i]; n:= n +1; end;end;sr:= sum / n;writeln;writeln('Cреднее арифметическое значение четных ',sr);end.

Валек
sr:5:2 лучше написать
Подобрянская Полина
согласен, но в условии нет такового, потому осталось все без изменений
Юлия Кулункова
это конечно верно
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт