Program zad2_44;
uses crt;
var x,y:integer;
BEGIN
clrscr;
writeln('Vvedite 99 readln(y);
x:=y mod 10*100+y div 10 mod 10*10+y div 100;
writeln('Otvet x=',x:4);
readln;
END.