Question

Вывести все чётные числа от 1 до 100 на языке программирования. Цикл с параметром

Answer 1

// PascalABC.NET 3.2, сборка 1383 от 09.02.2017
// Внимание! Если программа не работает, обновите версию!

begin
  for var i:=1 to 100 do
    if i.IsEven then Print(i)
end.

Результат
2 4 6 8 10 12 14 16 18 20 22 24 26 28 30 32 34 36 38 40 42 44 46 48 50 52 54 56 58 60 62 64 66 68 70 72 74 76 78 80 82 84 86 88 90 92 94 96 98 100