program PermutationNumber;

var
number, digit1, digit2, permutationNumber: integer;

begin
writeln('Введите двузначное число: ');
readln(number);

digit1 := number mod 10;
digit2 := number div 10;

permutationNumber := digit1 * 10 + digit2;

writeln('Число, образованное перестановкой цифр исходного числа: ', permutationNumber);
end.