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

1

Ответы и объяснения

2012-12-13T15:54:59+00:00

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.