Расширенный синтаксис вызова функции

В языке программирования Pascal есть возможность вызывать функцию и не использовать то значение, которое оно возвращает, т.е. вызов функции может внешне выглядеть как вызов процедуры, например:

{$X+} {Включаем расширенный синтаксис}

Function MyFunc(var x:Integer):Integer;

Begin

If x<0 Then x:=0

Else MyFunc:=x+10;

End; {MyFunc}

Var

i:Integer;

Begin

i:=1;

i:=2*MyFunc(i)-100; {Стандартный вызов функции}

MyFunc(i) {Расширенный вызов функции}

end.

С помощью расширенного синтаксиса нельзя вызывать стандартные функции. Компиляция с учетом расширенного синтаксиса включается активным состоянием опции EXTENDED SYNTAX диалогового окна OPTION/COMPILER или глобальной директивой компилятора {$X+}.

ОБРАБОТКА СИМВОЛЬНОЙ ИНФОРМАЦИИ

Строка – это последовательность символов. При использовании в выражениях строка обязательно заключается в апострофы. Количество символов в строке (длина строки) может динамически изменяться от 0 до 255. Определение строкового типа устанавливает максимальное количество символов, которое может содержать строка.

Формат описания строк:

1-ый способ:

Type

имя_типа = String [максимальная_длина_строки];

Var

идентификатор: имя_типа;

2-ой способ:

Var

идентификатор: String [максимальная_длина_строки];

Длина строки может не указываться, в этом случае принимается максимально возможная длина строки, равная 255 символов.

Пример:

Type

Stroka: String [50];

Var

St:Stroka;

St1: String;

St2: String [25];

Строку можно описать с помощью типизированной константы:

Сonst

St: String ='Сегодня хорошая погода!';