урок 10 задача 1

урок 10 задача 1

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

program Project1;
  var
    a :integer;
begin
  for a:=65 to 64 do
  write(a);
  readln();
  end.             
vedro-compota's picture

Добавить решения для варианта:

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

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

isaac_fan's picture

var i:integer;
begin
 
 for i:=35 to 64 do
 write(i, ' '); 
 
 readln();
end.
vedro-compota's picture

решение верное, форматирование нет

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