Програмисту поставили задачу написать программу которая по введённому натуральному числу n должна выводить через пробел все нечетные числа из диапазона от 1 до n

1

Ответы и объяснения

2014-01-22T17:51:51+04:00
Var
  i, n: integer;
begin
  readln(n);
  for i := 0 to n do
    if (i mod 2 = 1) then
      write(i, ' ');
end.