[iGeTT]

я раньше, когда еще будучи зеленым клепал програмки на паскале, делал так:

Код:

repeat
readln(s);
if s = 'blablabla' then begin
*code*
end;
until s = 'exit'