Question

Задача по программе Кумир Вывести на экран все нечетные числа от 1 до 5 . Заранее спасибо

Answer 1

var a,i:integer;

begin

a:=1;

for i:=1 to 5 do

 begin

    if a mod 2 <> 0 then write(a,' ');

     a:=a+1;

   end;

end.