С цикла с условием написать программу нахождения среднего арифметического любых 5 чисел.
282
470
Ответы на вопрос:
Program chisla;
var a, i, s :integer;
begin
for i:=1 to 5 do
begin
readln(a);
s:=s+a;
end;
WriteLn('Среднее арифметического 5 чисел = ', i div 5);
end.
Популярно: Информатика
-
denic31121.05.2022 16:25
-
katyaaalovely21.03.2023 14:54
-
Тeлeпузік06.08.2021 09:30
-
пппп9730.04.2022 22:53
-
Викуха4А19.06.2023 23:03
-
ninja2005xxx04.03.2020 03:19
-
Isildur328.09.2022 03:13
-
леон1511.10.2020 11:40
-
anilop1508.06.2022 20:25
-
DlCE1708.09.2022 20:35