program LOOPS1(input, output); var i, limit: integer; begin writeln('Please enter a limit.'); readln(limit); for i := 1 to limit do write(i,' '); writeln(' '); end.