Ответы
Ответ дал:
0
Если я правильно понял, то вот:
var i,n: Integer;
sum,t: Real;
begin
writeln('Введите кол-во чисел');
readln(n);
for i:=1 to n do
begin
writeln('Введите ',i,' число');
readln(t);
sum:=sum+t;
end;
writeln('Среднее арифметическое чисел: ',sum/n);
end.
var i,n: Integer;
sum,t: Real;
begin
writeln('Введите кол-во чисел');
readln(n);
for i:=1 to n do
begin
writeln('Введите ',i,' число');
readln(t);
sum:=sum+t;
end;
writeln('Среднее арифметическое чисел: ',sum/n);
end.
Вас заинтересует
1 год назад
2 года назад
8 лет назад
8 лет назад
8 лет назад