Построить блок-схему к программе pascal ABC var
i,a:integer;
begin
a:=1;
for i:=1 to 55 do begin
if (i mod 5)=0 then
a:=a*i;
end;
writeln('Произведение =',a);
end.
116
200
Ответы на вопрос:
Популярно: Информатика
-
barsik2000211.02.2022 16:52
-
polina135426.10.2020 05:55
-
kelaruu02.07.2021 06:07
-
лиз8724.07.2021 07:30
-
armagedon64115.12.2021 10:41
-
yakurnovanasta14.12.2022 14:09
-
AlCapone02509.08.2022 00:57
-
Доминатр20.03.2023 16:02
-
Fakla15.03.2021 22:35
-
байгинат103.01.2022 07:43