> -- Info21 писал(а):
> Правильно дедушка Вирт выкинул LOOP из Оберона-07.Не надо его никуда выбрасыватьС помощью LOOP отлично выражается один из вариантов цикла в ДРАКОНе.
## Код:
```
PROCEDURE loop;
BEGIN
  LOOP
    block1;
    IF cond THEN EXIT END;
    block2;
  END; (* LOOP *)
END loop;
```
