Вводится трехзначное число. В нем зачеркнули первую слева цифру и записали ее между второй и третьей. Найти полученное число.

PascalABC.NET 3.4.2, сборка 1881 от 19.11.2018Внимание! Если программа не работает, обновите версию!

begin

 var n := ReadInteger('n=');

 var (n1, n2, n3) := (n div 100, n div 10 mod 10, n mod 10);

 Println(100 * n2 + 10 * n1 + n3)

end.

Примерn= 627267