Составить в тетради программу на языке Паскаль на задачу: Определить среди 3-х случайно введенных чисел те, которые НАЦЕЛО ДЕЛЯТСЯ на 7. Вывести эти числа на экран.
173
352
Ответы на вопрос:
Отдел +; использует вывод из "", приём из ""; пер число, чётных, сумцифр, цифра: цел; указ число : = приём.число(); чётных : = 0; сумцифр : = 0; пока число > 0 вып цифра : = число остаток 10; если чет(цифра) то увеличить(чётных) кон; увеличить(сумцифр, цифра) кон; число : = число делить 10 кон; вывод.чцел("^%d %d", чётных, сумцифр, 0, 0) кон .
Популярно: Информатика
-
tanyalepihina217.08.2020 13:12
-
МейнКун0522.02.2021 22:20
-
Wolfie200621.06.2022 01:28
-
ame503.07.2022 02:30
-
neologisms25.09.2020 06:48
-
Napol2820.01.2020 15:12
-
noniqname28.07.2021 08:14
-
yuliyasss13.06.2020 06:46
-
ilia20057521.10.2020 05:52
-
keril93612.05.2023 19:08