Задание 1 Дополните предложение.
Языки
программирования
Разветвляющийся алгоритм
это
100
111
Ответы на вопрос:
144 162 2 //pascalabc.net 3.1 сборка 1200 begin var k : = 0; for var i : = 132 to 188 do begin var n : = i; while n mod 2 = 0 do n : = n div 2; while n mod 3 = 0 do n : = n div 3; if n = 1 then begin k += 1; writeln(i); end; end; writeln(k); end.
Популярно: Информатика
-
funny4303.03.2021 04:00
-
АльфисГугу24.09.2021 18:05
-
sinjay31.03.2023 21:21
-
teacupbunnies123.09.2022 03:20
-
LiiiiiiV31.05.2020 20:04
-
kidashapro30.06.2022 05:26
-
lemenchuk200106.12.2022 10:13
-
vladkunets7810.02.2020 21:57
-
zaika78724.04.2021 18:43
-
sevostyanova200229.09.2020 21:03