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

sibirskiysava sibirskiysava    2   24.09.2019 16:10    1

Ответы
5656200 5656200  08.10.2020 15:47
Program TZ5;
const
n=15;
var
a:array [1..n] of integer;
i,b:integer;
begin
randomize;
for i:=1 to n do begin
 a[i]:=random (20);
 a[i]:=a[i]-10;
        writeln(i,'  ',a[i]);
end;
b:=0;
for i:=1 to n do
      b:=b+a[i];
writeln('srednee = ',b/n);
readln;
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика