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

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

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

Паскаль.

Question

Витяша

1 мая, 17:27

+3

Ответы (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чисел, вводимых с клавиатуры.Паскаль.