как вывести первые десять нечётных чисел в паскале

begin writeln('1 3 5 7 9 11 13 15 17 19'); readln end.

или

var i:integer; begin for i:=1 to 10 do write(2*i-1:3); writeln; readln end.