А если использовать запись вида примерно такого:
Код:
if ((c1 >=5) or (c2 >= 5)) then
begin
if c1 >= 5 then GoTo yzi5;
if c2 >= 5 then GoTo yzi6;
end
else
begin
ShowMessage('Здоров');
GoTo quit; //жив, цел, орел. Выходим из программы
end;
И вполне резонный вопрос: а зачем использовать уже везде нерекомендуемый оператор безусловного перехода GoTo?