Составить программу, вычисляющую среднее

арифметическое n

чисел, вводимых с клавиатуры.

Паскаль.

Question

Нюня

6 января, 11:36

+1

Ответы (1)

Знаете ответ?

Розина · Answer 1

Var i, n:integer; x, s:real;

begin

read (n) ;

s:=0;

for i:=1 to n do

begin

read (x) ;

s:=s+x;

end;

writeln (s/n) ;

end.

Составить программу, вычисляющую среднееарифметическое nчисел, вводимых с клавиатуры.Паскаль.