Дано целое двузначное число х выведите число полученное при перестановке его цифр значение х введите с клавиатуры

Question

Информатика

Любомила

6 марта, 15:14

Дано целое двузначное число х выведите число полученное при перестановке его цифр значение х введите с клавиатуры

+3

Ответы (1)

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

Вераха · Answer 1

Program ff;

var

x:string;

begin

writeln ('Введите x:') ;

readln (x) ;

if x. Length=2 then

begin

x:=x[2]+x[1];

writeln (x) ;

end

else Writeln ('Введенное вами число имеет неверный формат') ;

end.