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

link

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

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