Question

Напишите на языке Паскаль программу, которая для произвольного двухзначного числа определяет число, образованное перестановкой цифр исходного числа.

Answer 1

Вариант 1. Обработка числа.
program z;
var x,y:integer;
begin
readln(x);
y:=(x mod 10)*10+x div 10;
writeln(y);
end.

Вариант 2. Обработка числа как строки.
program z;
var str:string;
begin
readln(str);
writeln(str[2]+str[1]);
end.