Написать программу которая выводит на экран все четные числа от 20 до 50

program even_numbers;

var i: integer; / / параметр цикла

begin

/ / Если остаток от деления числа i на 2 равен нулю,

/ / то вывести число i на экран

//Остаток от деления определяется с помощью оператора mod.

for i: = 20 to 50 do if i mod 2 = 0 then write (i : 4);

end.