Составить программу вывода ** экран нечетных чисел от 1 до 70 ( 2 цикла) обязательно два...

Question

Составить программу вывода на экран нечетных чисел от 1 до 70 ( 2 цикла) обязательно два цикла, дам 30 баллов

Answer 1

Var  
j,i:integer;
begin 
for i:=1 to 70 do 
   for j:=1 to 1 do
      if (i mod 2)<>0 then writeln(i);
end.