Дано четырёхзначное число. первую цифру перенести в конец числа (Паскаль)

BREYKER BREYKER    2   16.03.2021 21:03    2

Ответы
maryam67 maryam67  15.04.2021 21:08

var x:integer;

begin

   x:=1234;

   write((x mod 10) * 1000 + (x div 1000) + ((x mod 1000) div 10) * 10);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика