Опубликовано 11.06.2017 по предмету Информатика от Гость >> <<

Дано четырехзначное число. В нем зачеркнули цифру справа и приписали ее с лева. Вывести новое число. pascal

Ответ оставил Гость

PascalABC.NET
var a,b,c:integer;
begin
writeln(Введите четырехзначное число);
readln(a);
b:=a mod 10;
c:=a div 10;
writeln(b,c);
end.