|
Горбачев Л.И. Основы программирования в среде Turbo Pascal.
[НАЗАД] [ДАЛЕЕ]
3. Встроенные функции и процедуры для обработки строк.
Для обработки строковых данных используется ряд стандартных процедур
и функций.
- Length(S: string): integer; - функция, которая
вычисляет текущую длину (в символах) строки S. Результат имеет целочисленный
тип.
- Copy(S: string; Index: integer; Count: integer):
string; - функция, которая возвращает подстроку из S,
начиная с позиции Index, длиной Count. Если Index > Length(S), то результатом
будет пустая строка. Если Count задает больше символов, чем осталось в строке,
то возвращается только остаток строки.
- Delete(var S: string; Index: integer; Count:
integer); - процедура, которая удаляет из строки S подстроку длиной Count,
начинающуюся с позиции Index. Результатом является новая строка S без удаленной
подстроки. Если Count задает больше символов, чем остается в строке, то
удаляется остаток строки.
- Insert(Sourse: string; var S: string; Index: integer); - процедура, которая вставляет
строку Sourse в строку S, начиная с позиции Index. Если полученная в результате
строка S превышает 255 символов, то все лишние символы (начиная с 255-го)
отбрасываются.
- Str(X[: Width[: Decimals]]; var S: string); -
процедура преобразует числовое значение X в строковое представление. При этом
Width - количество позиций, отводимое под все число, представленное в строке, а
Decimals - место под его дробную часть (число представляется в строке в форме с
фиксированной точкой, в которой место под десятичную точку также следует
учитывать).
- Val(S: string; V: var; Code: integer); - процедура
преобразует строку S, содержащую символы '0'..'9', '.', '+', '-', 'E' (числа в
экспоненциальной форме), в его численное представление (V). Переменная V должна
иметь тип integer или real. С помощью директивы компилятора $R можно установить
для V выход за пределы заданной области.
- Pos(Substr, S: string): byte; - функция, которая
осуществляет поиск подстроки Substr в строке S и возвращает номер первого
символа в S, который является первым символом в Substr. Если в S не найдено
Substr, то возвращается 0. Результат имеет тип byte.
- Concat(S1[, S2,..., Sn]: string): string; - функция выполняет конкатенацию последовательности
строк S1, S2,..., Sn. Конкатенация в данном случае означает сцепление. Например:
Concat(S1, S2) аналогично S1 + S2
- UpCase(Ch) - преобразует строчную букву в прописную. Параметр и результат
имеют символьный тип. Обрабатывает буквы только латинского
алфавита.
Пример: Пусть Str := 'IBM PC'; Str1 := '/AT'
Процедура или функция |
Результат |
Length(Str) |
6 |
Copy(Str, 1, 3) |
'IBM' |
Delete(Str, 1, 4) |
'PC' |
InSert('/AT', Str, 6) |
'IBM PC/AT' |
Pos('PC', Str) |
5 |
Concat(Str, Str1) |
'IBM PC/AT' |
[НАЗАД] [ДАЛЕЕ]
|
|