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

Program Rick_and_Morty;var n,i:integer;Beginwrite('введите n: ');readln (n);write('ответ: ');for i:=1 to n dobeginwrite(i,' ');end;writeln('');writeln('конец');end.

// PascalABC.NET 3.3, сборка 1611 от 06.01.2018// Внимание! Если программа не работает, обновите версию!beginWriteln(Range(1,ReadInteger('n =')));end.