Ответ:

var a,b,c,n:integer;

begin

  write(‘n=’); read(n);

  a:=n mod 10;

  b:=n div 10 mod 10;

  c:=n div 100;

  write(a);

  write(b);

  write(c);

end.