Расширенный синтаксис вызова функции
В языке программирования 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='Сегодня хорошая погода !';
Дата добавления: 2015-04-15; просмотров: 830;