Как найти среднее арифметическое в одномерном массиве, если включен генератор случайных чисел?

Question

Информатика

Андрюха

2 июля, 23:38

Как найти среднее арифметическое в одномерном массиве, если включен генератор случайных чисел?

+2

Ответы (1)

Знаете ответ?

Эсфирка · Answer 1

Var a:array[1 ... 20] of integer;

i:integer;

sr:real;

begin

for i:=1 to 20 do begin

a[i]:=random (-20,20) ;

sr+=a[i];

write (a[i],' ') ;

end;

writeln;

write (sr/20:3:2) ;

end.