Составьте программу вычисления суммы всех положительных двухзначных чисел, кратных 8
255
362
Ответы на вопрос:
Var s,i: integer; begin s: =0; for i: =10 to 99 do begin if (i mod 8 = 0) then s: =s+i; end; writeln (s); end.
Популярно: Информатика
-
JaanB11.05.2021 23:56
-
Dzhemre6905.12.2021 02:02
-
mrsmauriziodimauro19.01.2023 06:23
-
zaec99914.03.2023 17:05
-
dianamakhmutova129.03.2023 17:26
-
AngreilKyzmun08.03.2023 18:39
-
Артём122877726.06.2020 06:27
-
hey11211.11.2022 08:23
-
VikaGrin105.02.2022 15:20
-
ghostcatchy23.12.2021 18:56