Регистрация
Masha45322
13.07.2021 12:05
Информатика
Есть ответ 👍

Числа вводятся с клавиатуры, пока не будет введён 0.вычислите среднее арифметическое этих чисел.первое же число может оказаться нулём.выведите в этом случае соответствующее текстовое сообщение.

221
349
Посмотреть ответы 2

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

Дженнет2001
Дженнет2001
4,4(24 оценок)
Program test; var x,i,s, sa: real; begini: =1; read (x); s: =x; if x< > 0 then             repeat      begin      read (x);       s: =s+x;       i: =i+1      end;       until x< > 0; if s=0 then write ('первое число ноль'); if s< > 0 then begin              sa: =s/i;               writeln (sa)              end; end.
artem0395
artem0395
4,4(89 оценок)

Я не вижу изоброжение как сделать

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