Надо сделать такую штуку :
repeat
... нажатие кдавиши
until нажато #13 или #27
можно ли это сделать без использования доп переменных т.е. не
ch:char;
repeat
ch:=readkey;
until (ch=#13)or(ch=#27);
until readkey in [#13, #27];
Отлично, спасибо.