циклы, проверка ввода данных Опции

[-=АнЮтА=-]

Подскажите пожалуйста, как зациклить проверку ввода . Такие условия - вводятся с клавиатуры три числа - a,b и c. Необходимо проверить - если с = 0, то нужно ввести новое с, пока с не будет удовлетворять условию. И только в этом случае продолжать работу. Как можно это сделать?
Заранее спасибо.)

[volvo]

Если C - целое:

Readln(a);
Readln(b);
repeat
  Readln( c );
until c <> 0;

если вещественное (нельзя сравнивать с нулем напрямую, можно - с учетом погрешности):

Readln(a);
Readln(b);
repeat
  Readln( c );
until abs( c ) > eps; { <--- где eps, например, равно 0.00001 }

[мисс_граффити]

....опять моих 200 символов в минуту не хватает на то, чтобы ответить первой

Сообщение отредактировано: мисс_граффити - 29.10.2006 15:29

[-=АнЮтА=-]

Спасибо большое, за ответ и за оперативност ь