Базовыми операциями над строками являются:
· определение длины строки;
· присваивание строк;
· конкатенация (сцепление) строк;
· выделение подстроки;
· поиск вхождения.
Операция определения длины строки имеет вид функции, возвращаемое значение которой - целое число - текущее число символов в строке. Операция присваивания имеет тот же смысл, что и для других типов данных.
Операция сравнения строк имеет тот же смысл, что и для других типов данных. Сравнение строк производится по следующим правилам. Сравниваются первые символы двух строк. Если символы не равны, то строка, содержащая символ, место которого в алфавите ближе к началу, считается меньшей. Если символы равны, сравниваются вторые, третьи и т.д. символы. При достижении одной конца одной из строк строка меньшей длины считается меньшей. При равенстве длин строк и попарном равенстве всех символов в них строки считаются равными.
Результатом операции сцепления двух строк является строка, длина которой равна суммарной длине строк-операндов, а значение соответствует значению первого операнда, за которым непосредственно следует значение второго операнда. Операция сцепления дает результат, длина которого в общем случае больше длин операндов. Как и во всех операциях над строками, которые могут увеличивать длину строки (присваивание, сцепление, сложные операции), возможен случай, когда длина результата окажется большей, чем отведенный для него объем памяти. Естественно, эта проблема возникает только в тех языках, где длина строки ограничивается. Возможны три варианта решения этой проблемы, определяемые правилами языка или режимами компиляции:
· никак не контролировать такое превышение, возникновение такой ситуации неминуемо приводит к труднолокализуемой ошибке при выполнении программы;
· завершать программу аварийно с локализацией и диагностикой ошибки;
· ограничивать длину результата в соответствии с объемом отведенной памяти;
Операция выделения подстроки выделяет из исходной строки последовательность символов, начиная с заданной позиции n, с заданной длиной l. В языке PASCAL соответствующая функция называется COPY. В языках PL/1 соответствующая функция - SUBSTR - обладает интересным свойством, отсутствующим в PASCAL. Функция SUBSTR может употребляться в левой части оператора присваивания. Например, если исходное значение некоторой строки S - 'ABCDEFG', то выполнение оператора: SUBSTR(S,3,3)='012'; изменит значение строки S на - 'AB012FG'.
При реализации операции выделения подстроки в языке программирования и в пользовательской процедуре обязательно должно быть определено правило получения результата для случая, когда начальная позиция n задана такой, что оставшаяся за ней часть исходной строки имеет длину, меньшую заданной длины l, или даже n превышает длину исходной строки. Возможные варианты такого правила:
· аварийное завершение программы с диагностикой ошибки;
· формирование результата меньшей длины, чем задано, возможно даже - пустой строки.
Операция поиска вхождения находит место первого вхождения подстроки-эталона в исходную строку. Результатом операции может быть номер позиции в исходной строке, с которой начинается вхождение эталона или указатель на начало вхождения. В случае отсутствия вхождения результатом операции должно быть некоторое специальное значение, например, нулевой номер позиции или пустой указатель.
На основе базовых операций могут быть реализованы и любые другие, даже сложные операции над строками. Например, операция удаления из строки символов с номерами от n1 включительно n2 может быть реализована как последовательность следующих шагов:
· выделение из исходной строки подстроки, начиная с позиции 1, длиной n1-1;
· выделение из исходной строки подстроки, начиная с позиции n2+1, длиной длина исходной строки - n2;
· сцепление подстрок, полученных на предыдущих шагах.
Впрочем, в целях повышения эффективности некоторые вторичные операции также могут быть реализованы как базовые - по собственным алгоритмам, с непосредственным доступом к физической структуре строки.
Для работы со строками предназначены процедуры и функции:
q function Length(s: string): integer - возвращает длину строки;
q function Copy(s: string; n1,n2: integer): string - возвращает часть строки;
q function Pos(s1: string; s: string): byte - ищет s1 подстроку в строке s;
q procedure Delete(var s: string; i,l: integer) - удаляет часть строки;
q procedure Insert(s1: string; var s: string; i: integer) - вставляет подстроку s1 в строку s;
q function ConCat(s1[,s2,..,sn]: string): string - об'единяет строки.
q Procedure Val(s: string; var x; var Code: integer) -
q Function StrToInt(s: string): integer
q function FloatToStr(Value: Extended): string;
q function FloatToStrF(Value: Extended; Format: TFloatFormat; Precision, Digits: Integer): string;
q s:= FloatToStrF(Value, ffFixed, 8, 3);
q function IntToStr(Value: Integer): string;
q procedure Str(X [: Width [: Decimals ]]; var S);
q function StrToFloat(const S: string): Extended;
