Предмет: Информатика,
автор: ilovezhenya228
Дано 4-х значное число. Вывести число, полученное перестановкой цифр тысяч и десятков. Например: 4321--->2341. Срочно!!! Программа Паскаль. Даю 30 баллов!!!
ilovezhenya228:
Если что программа в паскале. Пожалуйста, сделайте ее.
Ответы
Автор ответа:
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.
Похожие вопросы
Предмет: Химия,
автор: papina0875
Предмет: Геометрия,
автор: abdujalilovarayyona
Предмет: Биология,
автор: deadluntikelisej
Предмет: Обществознание,
автор: Аноним
Предмет: История,
автор: Аноним