Задача 1 Урок 10

Задача 1 Урок10

Выведите на экран, все четные числа от 35 до 64.

var i: integer;
begin
  for i:=35 to 64 do
  if ((i mod 2)=0) then
     writeln(i,' ');
  readln();
end.