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

Primary tabs

Submitted by RashidTR on Mon, 02/06/2023 - 19:31

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

var i:integer;
begin

  for i:=35 to 64 do
    if ((i mod 2) = 0) then
       write(i, ' ');

  readln();
end.