Урок 10.1 Задача 3

Primary tabs

Submitted by naveang on Mon, 03/21/2022 - 11:59

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

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