Задать вопрос Регистрация
Помочь другим

  • В ЭВМ вводятся по очереди данные о росте N учащихся класса. Определить средний рост учащихся класса.

Ответы 1

  • Program saidim;uses crt;const n=20;var  rost,sum,i:integer;begin  writeln('***********************');  writeln('**      Ростомер     **');  writeln('***********************');  writeln();  sum:=0;  for i:=1 to n do  begin    write('Введите рoст ',i,'-го ученика ');    readln(rost);    sum:=sum+rost;  end;   writeln('*** alphaues is thinking... ***');  writeln();  writeln('Средний рост учащихся класса равен ',sum/n);end.

    • Автор:

      shawn1d5t
    • 5 лет назад
    • 0

  • Добавить свой ответ

Еще вопросы

Топ пользователей

Войти через Google

 или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years