Дано 3-х значное число,найти число,которое образуется перестановкой десятков и едениц. (программа Паскаль)
Program al;
var a,b,c,n:integer;
begin
writeln(n=);
readln(n);
a:=n div 100;
b:=n div 10 mod 10;
c:=n mod 10;
writeln(novoe=,a,c,b);
readln;
end.
Оцени ответ
