Вывести на экран все четные числа от 3 до 35. в Паскаль

program zz1;

var i:integer; / /заводим переменную для цикла

begin

for i: = 3 to 35 do / /организуем цикл для перебора всех чисел от трех до тридцати пяти

if i mod 2 = 0 then write (i,' '); / /проверяем, если число делится на два, то выводим его на экран в строчку через пробел

end.