Среди всех двухзначных чисел найдите те,которые чётные и кратны 7. Вывести числа на экран

Среди всех двухзначных чисел найдите те,которые чётные и кратны 7. Вывести числа на экран
Гость
Ответ(ы) на вопрос:
Гость
var i: integer; begin   i:=14;   repeat     write(i,' ');     i:=i+14;   until i>99; end. 14 28 42 56 70 84 98
Гость
Если число четное, то оно кратно 2. Если число кратно одновременно 2 и 7, то оно кратно из произведению, т.е. 14.  Первое такое двухзначное число - это само число 14. Остальные будут получаться путем добавления 14, т.е. получаем ряд 14, 28, 42. ... // PascalABC.NET 3.2, сборка 1407 от 18.03.2017 // Внимание! Если программа не работает, обновите версию! begin   Range(14,99,14).Println end. Результат 14 28 42 56 70 84 98
Не нашли ответ?
Ответить на вопрос
Похожие вопросы