Дано натуральное число n. написать программу, выводящую первых n нечетных чисел 1,3,5 (через while)

Var n, s: integer;
begin
write('Введите n: ');
read(n);
s:=1;
while(n*2>s) do
begin
write (s, ' ');
s:=s+2;
end;
end.