Процедуры. Функции
Процедуры
Procedure ...
Delete ( var St : String ; Poz : Integer ; N : Integer ) ;
| —
| удаление N символов строки St, начиная с позиции Poz
| Например:
Значение St
| Выражение
| Результат
| 'абвгде'
| Delete ( St, 4, 2 )
| 'абве'
|
Insert ( Str1 : String ; var Str2 : String ; Poz : Integer) ;
| —
| вставка строки Str1в строку Str2, начиная с позиции Poz
| Например:
Var
S1, S2, S3 : string [ 11 ] ;
...
S1 := ' EC ' ;
S2 := 'ЭВМ1841' ;
Insert ( S1, S2, 4 ) ;
В результате выполнения последнего выражения значение строки S3 станет равным
'ЭВМ ЕС 1841'.
Str ( I ; var St : String ) ;
| —
| преобразование числового значения выражения I (целого или вещественного типа) и помещение результата в строку St. После I может записываться формат, аналогичный формату вывода. Если в формате указано недостаточное для вывода количество разрядов, поле вывода расширяется автоматически до нужной длины
| Например:
Значение I
| Выражение
| Результат
|
| Str ( I : 6, St )
| ' 1500'
|
Val ( St : String ; var I ; var Code : Integer ) ;
| —
| преобразует значение St в величину целочисленного или вещественного типа и помещает результат в I. Значение St не должно содержать незначащих пробелов в начале и в конце. Code — целочисленная переменная. Если во время операции преобразования ошибки не обнаружено, значение Code равно нулю, если ошибка обнаружена (например, литерное значение переводится в цифровое), Code будет содержать номер позиции первого ошибочного символа, а значение I не определено
| Например:
Значение St
| Выражение
| Результат
| '1450'
| Val ( St, I, Code )
| 1450
Code = 0
|
Функции
Function ...
Copy ( St : String ; Poz : Integer ; N : Integer ) : String ;
| —
| выделяет из строки St подстроку длиной N символов, начиная с позиции Poz
| Например:
Значение St
| Выражение
| Результат
| 'ABCDEFG'
| Copy (St, 2, 3 )
| 'BCD'
|
Concat ( Str1, Str2, ... , StrN : String ) : String ;
| —
| выполняет сцепление строк Str1, Str2, ... , StrN в том порядке, в каком они указаны в списке параметров
| Например:
Выражение
| Результат
| Concat ( 'AA', 'XX', 'Y' )
| 'AAXXY'
|
Length ( St : String ) : Integer ;
| —
| вычисляет длину в символах строки St
| Например:
Значение St
| Выражение
| Результат
| '123456789'
| Length( St )
|
|
Pos ( SubStr, Str : String ) : Byte ;
| —
| обнаруживает первое появление в строке Str подстроки SubStr. Результат имеет целочисленный тип и равен номеру той позиции, где находится первый символ подстроки SubStr. Если в Str подстроки SubStr не найдено, результат равен 0
| Например:
Значение Str
| Выражение
| Результат
| 'abcdef'
| Pos ( 'de', Str )
|
| 'abcdef'
| Pos ( 'r', Str )
|
|
Примеры программ обработки строк
1. Дана строка. Слова в строке разделены одним пробелом, в конце строки точка. Распечатать слово максимальной длины.
|