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

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

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

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

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