Составьте программу вывода ** экран всех нечетных чисел от -10 до 50

Question

Составьте программу вывода на экран всех нечетных чисел от -10 до 50

Answer 1

Var 
i: integer;
begin
for i := 1 to n do
if (i mod 2 <> 0) then write(i, ' ');
readln;
end.

Comments

спасибо❤ но поздно