Вести с клавиатуры 5 дробных чисел и после ввода каждого 1 числа выводить среднее арифметическое введенной части последовательности. на паскале .
113
245
Ответы на вопрос:
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
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.
ппппппппппппппппппппппппппппппппппппппппппппппппппппппппппппппппппп
Объяснение:
Популярно: Информатика
-
lol1337rus25.11.2022 02:36
-
КундызДиас11.06.2020 08:35
-
ekaterinaanta16.05.2022 21:26
-
Маруська24613.02.2020 04:45
-
Zubu02.06.2023 01:08
-
123456789060629.04.2023 18:07
-
ЮлияYli16.01.2023 07:35
-
Ramaz777117.05.2020 01:34
-
znani522.01.2020 22:00
-
Irishka2k1702.11.2021 18:07