|
Расширинный синтаксис вызова функций
В Турбо Паскале есть
возможность вызывать функцию и не использовать то значение,
которое она возвращает. Иными словами, вызов функции
может внешне выглядеть как вызов процедуры, например:
{$Х+} {Включаем расширенный синтаксис}
Function My.Func (var x : Integer) :
Integer;
begin
if x<0 then x:=0
else MyFunc := x+10
end; {MyFunc}
var
i : Integer;
begin {main}
i := 1;
i := 2*MyFunc(i) -100; {Стандартный
вызов функции}
MyFunc ( i ) {Расширенный синтаксис
вызова}
end. {main}
Расширенный синтаксис делает использование
функций таким же свободным, как, например, их использование
в языке Си, и придает Турбо Паскалю дополнительную гибкость.
С помощью расширенного синтаксиса нельзя вызывать стандартные
функции. Компиляция с учетом расширенного синтаксиса
включается активным состоянием опции EXTENDED SYNTAX
диалогового окна OPTIONS/COMPILER (см. прил.1) или глобальной
директивой компилятора {$Х+}.
|
