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

Question

Гость

Ответ(ы) на вопрос:

Accepted Answer

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.