Дан массив из 40 элементов от 0 до 2000. Найти и вывести среднее арифметическое нечетных трехзначных чисел.

Question

Симона

24 марта, 20:16

+2

Ответы (1)

Знаете ответ на вопрос?

Виринея · Answer 1

k:=0;

m:=0;

for i:=1 to 40 do begin

if (a[i]>99) and (a[i]<1000) and (a[i]mod20) then

k:=k+1;

m:=m+a[i];

end;

writeln (m/k) ;

end.