Ответы на вопрос:
Var i,s,a: integer; begin s: =0; for i: =21 to 99 do begin a: =i mod 10; if (i mod 3 = 0)and((a=2)or(a=4)or(a=8)) then s: =s+i; end; writeln('s = ',s); end. результат: s = 402
Популярно: Информатика
-
Aleksey8b14.05.2021 12:45
-
shuius12.08.2022 02:11
-
evgehamorozov06.10.2021 21:15
-
antonkovalenko116.10.2022 20:15
-
luss5518.02.2022 19:42
-
Mandjiev06.06.2020 11:02
-
csmos03.06.2021 02:41
-
serg620524.01.2022 03:05
-
Бекзатажеси28.05.2020 05:55
-
danaj0411.03.2020 10:07