Дано четырехзначное число в нем зачеркнули последнюю цифру и приписали ее в начало числа. Найти его, и записать в программе Pascal. (число любое)

Есть ответ
17.12.2022
203

Ответ


var a,b,c, x: real;

begin

write('vvedite chislo');

readln(a);

b:=a mod 10;

c:=a div 10;

x:=b*1000+c;

write('x = ',x);

readln;

end.

 


Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
17.12.2022
Этот сайт использует cookies (Политика Cookies). Вы можете указать условия хранения и доступ к cookies в своем браузере.