> -- Vlad писал(а):
> Где find - аналог стандартной функции практически любого уважающего себя современного ЯВУ (оберон, к несчастью, такую функцию реализовать не позволяет). И знание этой функции надо требовать на собеседовании, чтобы потом не продираться через горы велосипедных циклов, навернутых только ради поиска элемента в последовательности.
Простейший цикл## Код:
```
WHILE (i < LEN(a)) & ~(a[i] = f) DO INC(i) END;
```
заменять функцией???