Question

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

Answer 1

// PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
// Внимание! Если программа не работает, обновите версию!

begin
  var n:=ReadInteger('n=');
  Writeln(n mod 10,n div 10)
end.

Answer 2

Конечно! Вот программа на языке Паскаль, которая выполняет указанную задачу:

pascalCopy code
program Permutation;

var
  number, reversedNumber: Integer;
  unitsDigit, tensDigit: Integer;

begin
  // Ввод двузначного числа
  Write('Введите двузначное число: ');
  ReadLn(number);

  // Получение цифр числа
  unitsDigit := number mod 10;
  tensDigit := number div 10;

  // Формирование перестановки цифр
  reversedNumber := (unitsDigit * 10) + tensDigit;

  // Вывод результата
  WriteLn('Число, образованное перестановкой цифр: ', reversedNumber);

end.

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