Задача 3 Урок 12.1

Задача 3 Урок 12.1

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

var i: char;
begin
  repeat
   writeln('vvedite simvol');
   readln(i);
    write('&');
  until (i = '#');
 readln();
end.