P>IF a THEN x ELSIF b THEN y ELSE z END = * a * x * b * y * z *
P>
P>А что, в Оберонах внутри IF только одиночный оператор ставится, даже функцию нельзя вызвать, а тем более параметры ей передать? Все веселее становится.
Представьте себе — можно!
Более того, в процитированном Вами примере вызвается три процедуры x, y и z.
