Ответы
Ответ дал:
0
var n, sum, i, j:integer;
begin
sum:=0;
write('Enter N: ');
readln(n);
writeln('Enter N numbers:');
for i:=1 to n do
begin
read(j);
sum:=sum+j;
end;
writeln('Average is ', sum/n)
end.
Вас заинтересует
1 год назад
1 год назад
7 лет назад
9 лет назад
9 лет назад