TURBO PASCAL:Учебное пособие. Терёхин В.В. - 75 стр.

UptoLike

Составители: 

75
t:= length (S) ;
После выполнения последнего оператора присваивания целая
переменная t будет иметь значение 14 (символов).
function Pos(Sl, S2: String): Integer ; - функция возвращает но-
мер первой позиции вхождения строки S1 в строку S2.
Примеры:
1)
S:= 'ABCDEF';
Sl:= 'CDE';
t:= pos(Sl , S);
Переменная t будет иметь значение 3.
2)
S:= 'АВСАВСАВСАВС ‘ ;
S1:= 'BС';
t : = pos(S1, S) ;
Переменная t будет иметь значение 2.
function Copy(S: String; n, l: integer): String; - функция выреза-
ет и возвращает часть строки S длиной l символов начиная с
символа, имеющего номер n.
Примеры:
1)
S:= 'ABCDEFG’ ;
S1:= copy(S, 3, 4);
В данном случае функция возвратит значение 'CDEF'.
2)
S:= 'мама мыла раму';
S1:= copy(S, 6, 4);
Функция возвратит значение 'мыла'.
procedure Delete(Var S: String; n, l: integer);процедура уда-
ляет часть строки S, начиная с позиции n, длиной l символов.
Примеры:
1)
t:= length (S) ;
После выполнения последнего оператора присваивания целая
переменная t будет иметь значение 14 (символов).

function Pos(Sl, S2: String): Integer ; - функция возвращает но-
мер первой позиции вхождения строки S1 в строку S2.
        Примеры:
        1)
S:= 'ABCDEF';
Sl:= 'CDE';
t:= pos(Sl , S);
Переменная t будет иметь значение 3.
        2)
S:= 'АВСАВСАВСАВС ‘ ;
S1:= 'BС';
t : = pos(S1, S) ;
Переменная t будет иметь значение 2.

function Copy(S: String; n, l: integer): String; - функция выреза-
ет и возвращает часть строки S длиной l символов начиная с
символа, имеющего номер n.
       Примеры:
       1)
S:= 'ABCDEFG’ ;
S1:= copy(S, 3, 4);
В данном случае функция возвратит значение 'CDEF'.
       2)
S:= 'мама мыла раму';
S1:= copy(S, 6, 4);
Функция возвратит значение 'мыла'.

procedure Delete(Var S: String; n, l: integer); — процедура уда-
ляет часть строки S, начиная с позиции n, длиной l символов.
       Примеры:
       1)
                                                                75