Вывести числа от 10 до 30, которые делятся на 2 и на 3, но не делятся на 4
Вывести числа от 10 до 30, которые делятся на 2 и на 3, но не делятся на 4
Гость
Ответ(ы) на вопрос:
ГостьОТДЕЛ Задание+;
ИСПОЛЬЗУЕТ Вывод ИЗ "...\Отделы\Обмен\";
ПЕР
сч: ЦЕЛ;
УКАЗ
ОТ сч := 10 ДО 30 ВЫП
ЕСЛИ сч ОСТАТОК 2 = 0 И сч ОСТАТОК 3 = 0 И сч ОСТАТОК 4 # 0 ТО
Вывод.ЧЦел("%d ", сч, 0, 0, 0)
КОН
КОН
КОН Задание.
Не нашли ответ?
Похожие вопросы