contrlc Var
  n, i: integer;
 
begin
  read(n);
  for i := 1 to n do write(n - i + 1, ' ');
end.

vvvvvvvvvvvvvvvvvvvvvvvvvvvvv