Народ помогите! Паскаль. Напишите пожалуйста программу через while.
В компьютер вводятся по очереди данные о росте N учащихся класса. Определить средний рост учащихся в классе. Через цикл for код писать не нужно. Заранее спасибо!!! 30 баллов.
Ответы
Ответ дал:
0
Ответ:var N,sr,a,r : Integer;
S : real:
sr:=0;
r:=0;
Read(N);
While N<>0 do
Begin
Read(a);
r:=r+a;
End;
Sr:=r/N;
Writeln(Sr);
End.
Объяснение:
Вас заинтересует
4 месяца назад
5 месяцев назад
5 месяцев назад
2 года назад
2 года назад
7 лет назад