var a,b,c,x,z:integer; begin readln(x); a:= x div 100; b:= (x-(x div 100)*100) div 10; c:= x mod 10; println('Cотен - ',a,'Десятков - ',b,'Единиц -',c); println('Их сумма - ',a+b+c); z:=a; a:=b; b:=z; x:=a*100+b*10+c; println('Поменяем 1 и 2 цифры - ',x); end.