В паскале! В любом трехзначном числе удалить первую цифру, а в оставшемся 2-х значном числе переставить цифры.
Var a,a1,a2,a3: integer; begin read(a); a1:=a div 100 mod 10; a2:=a mod 100 div 10; a3:=a mod 10; writeln (a3,a2); end.