⇢ 
Кристина
помогите написать прогу в ПАСКАЛЕ
С клавиатуры вводится четырехзначное целое число. Переставить местами в числе две первые и две последние цифры. (Например: 6723 на 2367)
написать в div и mod
Otto Khatamov
var
n: integer;
begin
write('n? ');
readln(n);
n := n div 100 + n mod 100 * 100;
write('result: ', n);
end.
Похожие вопросы