Задание 3 Урок 12.1

Задание 3 Урок 12.1

Пользователь вводит в консоль символы (после каждого нажимая
Enter), в ответ выводите символ '&', до тех пор пока пользователь не введёт '#',
после чего завершите программу.

var i : char;

begin
  repeat
    write('Введите символ и нажмите ENTER:');
    readln(i);
  until (i = #35);
  write('Программа завершена, нажмите ENTER!');
  readln();
end.