Ответы на вопрос:
Program five_sum; var c, sum : integer begin c : = 2; sum : = 0; while c < 56 do begin if c mod 5 = 0 then sum : = sum + c; c : = c + 1 end; writeln( sum ); end.
Var a, b, c: integer; begin c : = 56; for a : = 2 to c do begin if a mod 5 = 0 then b : = b + a; end; writeln(b); end.
Популярно: Информатика
-
12345152802.04.2020 18:07
-
win6612326.06.2021 01:32
-
smirnovigor24.02.2020 17:00
-
Kseniya00000107.07.2020 22:37
-
avetik0425.02.2023 19:47
-
Дарья2201200728.11.2020 05:39
-
SokhraNNaya12.12.2022 06:12
-
H1biki26.09.2021 10:18
-
hodyukmaria29.05.2022 22:44
-
JeepandChira1302.01.2020 19:30