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

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

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

program lesson12_3;
var
  c: char;
begin
    repeat
        writeln('enter number c');
        readln(c);
        if c = '#' then
            break;
        writeln('&');
	until c = '#';
end.
vedro-compota's picture

решение засчитано

_____________
матфак вгу и остальная классика =)