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

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

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

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