Консоль в Delphi

[Джек12]

Здравствуйте!) Помогите пожалуйста решить задачу в консоль Delphi
Вот задача: В трехзначном числе X зачеркнули его последнюю цифру. Когда в оставшемся двухзначном числе переставили цифры, а затем приписали к ним слева последнюю цифру числа X,то получилось 654. Найти число X.

[Streletz]

Подсказка.
Попробуйте в уме "проиграть" все эти действия в обратном порядке.

Сообщение от Джек12

В трехзначном числе X зачеркнули его последнюю цифру. Когда в оставшемся двухзначном числе переставили цифры, а затем приписали к ним слева последнюю цифру числа X,то получилось 654

Тогда Вам сразу будет ясно как решить эту задачу уже в виде кода на Delphi.

[Stilet]

program Project1;
const x='654';
begin
 write(x[3],x[2],x[1]); readln;
end.

Сойдет?