Массив состоит из 15 чисел , числа могут быть отрицательными , вычислить среднее арифметическое

Question

Информатика: Массив состоит из 15 чисел , числа могут быть отрицательными , вычислить среднее арифметическое​

frankovskaaalin · Answer

var a:array[1..15] of real;

i:integer;s:real;

begin

randomize;

s:=0;

for i:=1 to 15 do

begin

a[i]:=random(10)-5;

write(a[i],' ');

s:=s+a[i];

end;

writeln;

write('s=',s/15);

end.

Массив состоит из 15 чисел , числа могут быть отрицательными , вычислить среднее арифметическое​