Информатика, опубликовано 2018-08-22 22:18:55 by Гость
Ввести четырехзначное число. Поменять крайние цифры числа местами.
Ответ оставил Гость
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
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.