{$APPTYPE CONSOLE}
uses
  SysUtils;

var contador,pasos:Integer;
begin
Write('Hasta donde Cuento ' );
readln(pasos);
for  contador:=1  to pasos do//"PARA" (contador igual a 1) "HASTA" (pasos) "HACER
                             //En este tipo el ciclo la variable de control va aumentado automaticamente de uno en uno
begin
Write(contador);
write(' ');
end;

readln;

  { TODO -oUser -cConsole Main : Insert code here }
end.