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

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

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

var i:integer;
begin

  for i:=35 to 64 do
  if ((i mod 2) = 0) then
    write(i,' ');
  readln();
end. 
vedro-compota's picture

решение засчитано

_____________
матфак вгу и остальная классика =)