Ввести четырехзначное число. Поменять крайние цифры числа местами.
Ввести четырехзначное число. Поменять крайние цифры числа местами.
Гость
Ответ(ы) на вопрос:
ГостьVar n : Integer;
Begin
Readln(n);
n:=(n mod 10)*1000+(n mod 1000 div 10)*10+(n div 1000);
Writeln(n);
end.
Ввод: 1234
Вывод: 4231
Не нашли ответ?
Похожие вопросы