Program acolada;
var
i,n:longint;
cin,cout:text;
begin
assign(cin,'submultimi.in');reset(cin);
assign(cout,'submultimi.out');rewrite(cout);
read(cin,n);
for i:=1 to n do
  begin
  writeln(cout,i);
  write(cout,i,' ');
  end;
close(cin);
close(cout);
end.