Предмет: Информатика, автор: ilovezhenya228

Дано 4-х значное число. Вывести число, полученное перестановкой цифр тысяч и десятков. Например: 4321--->2341. Срочно!!! Программа Паскаль. Даю 30 баллов!!!


ilovezhenya228: Если что программа в паскале. Пожалуйста, сделайте ее.

Ответы

Автор ответа: HumphreyVanVeiden
0

var

x: integer;

begin

readln (x);

writeln (((x mod 100) div 10)*1000 + ((x mod 1000) div 100)*100+(x div 1000)*10 + x mod 10)

end.

Похожие вопросы