Дано 3-х значное число,найти число,которое образуется перестановкой десятков и едениц. (программа Паскаль)

Дано 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.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы