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

Question

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

Answer 1

Если число четное, то оно кратно 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

Answer 2

Var i: integer;
begin
  i:=14;
  repeat
    write(i,' ');
    i:=i+14;
  until i>99;
end.

14 28 42 56 70 84 98