Question

напишите программу для решения задачи вычисления среднего арифметического значения первых n натуральных чисел СРОЧНО!!! ПАСКАЛЬ!! ДАЮ 50 БАЛЛОВ

Answer 1

Ответ:

var n,i,sred:integer;

begin

 sred:=0;

read(n);

for i:=1 to n do

 begin

sred:=sred+i;

end;

write(sred/n:8:2);

end.

Объяснение: