Есть ответ 👍

НАЙТИ ОТВЕТЫ К IT KNYGA 8 КЛАС

172
213
Посмотреть ответы 1

Ответы на вопрос:


Var i,sum,m,pr: real; begin  i: =1;   m: =-1;   writeln('вводите рост учеников, когда закончите введите  0.'); while (i< > 0) do begin                            readln(i);                                 sum: =sum+i;                 m: =m+1;                     end;           pr: =sum/m;         writeln('средний рост: ',pr);         end.                  

Популярно: Информатика