Составьте программу которая выводит на экран числа от 1 до n

Program Rick_and_Morty;
var n,i:integer;
Begin

write('введите n: ');
readln (n);

write(': ');

for i:=1 to n do
begin
write(i,' ');
end;

writeln('');
writeln('конец');

end.