Лабораторный практикум по программированию на языке Паскаль. Найханова Л.В - 61 стр.

UptoLike

61
. . .
len := ord(st[0]);
. . .
Здесь st - переменная строкового типа.
Если стрингу присваивается значение строкового выражения с длиной, большей чем
максимально допустимая, происходит отсечение строки до максимальной длины,
например:
VAR
st : string[5];
BEGIN
st := 'очень длинная строка';
writeln(st); { будет отображено только: 'очень'}
. . .
8.2. Основные операции
Для строковых типов данных определена операция "конкатенация", обозначаемая
символом '+'. Смысл операции заключается в формировании новой строки. Динамическая
длина сформированной строки равна сумме символов строк-операндов, а ее значение равно
последовательности символов исходных строк.
Например:
VAR
str1, str2 : string[10];
st : string[25];
BEGIN
str1 := 'Паскаль - ';
str2 := 'программа';
st := str1 + str2;
WriteLn(st)
END.
В результате выполнения программы будет на экране отображена текстовая строка: 'Паскаль
- программа'.
Кроме операции конкатенации над значениями строковых типов разрешены операции
сравнения < , <=, > , >=, = , <>, IN, при выполнении которых действуют следующие
правила:
а) более короткая строка всегда меньше более длинной;
б) если длины сравниваемых строк равны, то происходит поэлементное сравнение символов
этих строк с учетом лексикографической упорядоченности значений
в) компаратор IN определяет вхождение левого операнда в правый. Если левый операнд
входит в правый, то результат компарации будет истинным (TRUE), в противном случае -
ложным (FALSE). Левым операндом может быть только элементарное данное (здесь
символ), а правым - любое множество элементов, в данном случае стринг или литерный ряд.
8.3. Доступ к элементам строковых данных
Доступ к отдельным элементам строк осуществляется аналогично доступу к элементам
одномерного массива: после имени строковой переменной необходимо в квадратных
скобках указать арифметическое выражение целого типа, например:
VAR
mline : string;
i : integer;
BEGIN
. . .
for i := 1 to length( mline ) do
 . . .
len := ord(st[0]);
 . . .
Здесь st - переменная строкового типа.
Если стрингу присваивается значение строкового выражения с длиной, большей чем
максимально допустимая, происходит отсечение строки до максимальной длины, например:
 VAR
        st : string[5];
 BEGIN
         st := 'очень длинная строка';
         writeln(st); { будет отображено только: 'очень'}
          . . .

8.2. Основные операции
Для строковых типов данных определена операция "конкатенация", обозначаемая
символом '+'. Смысл операции заключается в формировании новой строки. Динамическая
длина сформированной строки равна сумме символов строк-операндов, а ее значение равно
последовательности символов исходных строк.
Например:
         VAR
          str1, str2 : string[10];
          st          : string[25];
         BEGIN
          str1 := 'Паскаль - ';
          str2 := 'программа';
          st := str1 + str2;
          WriteLn(st)
         END.

В результате выполнения программы будет на экране отображена текстовая строка: 'Паскаль
- программа'.
Кроме операции конкатенации над значениями строковых типов разрешены операции
сравнения < , <=, > , >=, = , <>, IN, при выполнении которых действуют следующие
правила:
а) более короткая строка всегда меньше более длинной;
б) если длины сравниваемых строк равны, то происходит поэлементное сравнение символов
этих строк с учетом лексикографической упорядоченности значений
в) компаратор IN определяет вхождение левого операнда в правый. Если левый операнд
входит в правый, то результат компарации будет истинным (TRUE), в противном случае -
ложным (FALSE). Левым операндом может быть только элементарное данное (здесь
символ), а правым - любое множество элементов, в данном случае стринг или литерный ряд.
8.3. Доступ к элементам строковых данных
Доступ к отдельным элементам строк осуществляется аналогично доступу к элементам
одномерного массива: после имени строковой переменной необходимо в квадратных
скобках указать арифметическое выражение целого типа, например:

      VAR
       mline : string;
       i       : integer;
      BEGIN
         . . .
       for i := 1 to length( mline ) do

                                                                                    61