Предмет: Информатика,
автор: Gilrs
Дано четырёхзначное число. Получить число, образуемое при перестановке двух первых и двух последних цифр заданного числа. Например, из числа 4567 получить 6745. Мне нужна программа в Pascal!!!!!!!
Ответы
Автор ответа:
0
var
a : integer;
begin
read (a);
a := a div 100 + (a mod 100) * 100;
write (a);
end.
Интересные вопросы
Предмет: Математика,
автор: bsgshsgsg
Предмет: Алгебра,
автор: kakbi53
Предмет: Литература,
автор: PoLY152
Предмет: Информатика,
автор: alenka1238
Предмет: Алгебра,
автор: Волдеморт7