Есть ответ 👍

Вести с клавиатуры 5 дробных чисел и после ввода каждого 1 числа выводить среднее арифметическое введенной части последовательности. на паскале .

113
245
Посмотреть ответы 3

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


program raf105;

var a,b: real;

i: integer;

begin

writeln('вводите 5 чисел по очереди');

for i: =1 to 5 do

begin

  readln(a);

  b: = b+a;

  writeln('среднее арифметическое чисел, введёнх ранее: ',b/i);

end;

end.

язык программирования pascalabc

Halula
4,7(18 оценок)

var

  sr, num: real;

  i: integer;

begin

  sr : = 0;

  for i : = 1 to 5 do

  begin

    read(num);

    sr : = sr + num;

    write(sr / i,' ');

  end;

end.


ппппппппппппппппппппппппппппппппппппппппппппппппппппппппппппппппппп

Объяснение:

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