Придумай і запиши умову задачі для розв'язання якої можна використати дану алгоритмічну констукцію
155
395
Ответы на вопрос:
Var i, k: integer; begin i: = 100; k: = 0; while i < 1000 do begin if (i * 2 mod 10 = 8) and (i * 3 mod 10 = 4) then write(i, ' ') else k: = k + 1; i: = i + 1; end; if k = 900 then writeln('таких чисел не существует! '); end.
Популярно: Информатика
-
shinkevivh200116.04.2021 21:49
-
Ёкабоня623.09.2022 00:11
-
aziret3110103.05.2021 12:37
-
1010ВАДИМ07.12.2021 15:30
-
alexandrsub67p08sqm21.04.2022 02:30
-
nastyamashkina1207.04.2020 16:54
-
3vovo4ka309.01.2021 18:38
-
Lero4ka22215.05.2023 18:10
-
chernika2531.05.2022 14:09
-
princess8215.06.2020 13:49