напишите программу вывода нечетных чисел от 1 до n

begin
  var n:=ReadInteger('n=');
  Range(1,n,2).Println
end.


n= 58
1 3 5 7 9 11 13 15 17 19 21 23 25 27 29 31 33 35 37 39 41 43 45 47 49 51 53 55 57