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

// PascalABC.NET 3.2, сборка 1385 от 14.02.2017begin   var n:=ReadInteger('n=');  Range(1,n,2).Printlnend.Примерn= 581 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