program PermutationNumber;
varnum, firstDigit, secondDigit, permutationNum: integer;
beginwriteln('Enter a two-digit number:');readln(num);
firstDigit := num mod 10;secondDigit := num div 10;
permutationNum := firstDigit * 10 + secondDigit;
writeln('Permutation number is: ', permutationNum);end.
program PermutationNumber;
var
num, firstDigit, secondDigit, permutationNum: integer;
begin
writeln('Enter a two-digit number:');
readln(num);
firstDigit := num mod 10;
secondDigit := num div 10;
permutationNum := firstDigit * 10 + secondDigit;
writeln('Permutation number is: ', permutationNum);
end.