Строка: Каждый вводимый символ добавлять к началу строки. Как это реализовать? - Prolog

Формулировка задачи:

Нужно вводить символ, и добавлять его к началу строки. Как это реализовать ? Может есть у кого какие идеи, или готовый проект, буду очень благодарен. Заранее спасибо.

Решение задачи: «Строка: Каждый вводимый символ добавлять к началу строки. Как это реализовать?»

Листинг программы

goal
 
readchar(Ch),
write(Ch), nl,
readln(Src),
frontchar(Dst, Ch, Src),
write(Dst), nl.

Объяснение кода листинга программы

В данном коде реализована задача Каждый вводимый символ добавлять к началу строки. Вот список действий, которые выполняются в коде:

readchar(Ch) - считывание одного символа из стандартного ввода.
write(Ch) - вывод считанного символа.
nl - перевод строки.
readln(Src) - считывание строки из стандартного ввода до конца строки.
frontchar(Dst, Ch, Src) - добавление первого символа из строки Src в начало строки Dst.
write(Dst) - вывод измененной строки.
nl - перевод строки. В результате выполнения данного кода каждый введенный символ будет добавлен к началу строки.