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

Question

Информатика

Ержек

28 августа, 22:50

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

+5

Ответы (1)

Знаете ответ на вопрос?

Абердин · 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.