В прошлый раз мы разобрали стандартные процедуры в Pascal, применимые к строковому типу данных. Сегодня я расскажу про функции, которые применяются к этому типу данных.
Первая функция, про которую я сегодня расскажу, — функция определения длины строки Length (s). Принцип этой функции очень прост. В скобочках указывается строка, длину которой нужно найти. Возвращает эта функция одно значение — количество символов из которых состоит строка. Функция Length (s), как и все функции в паскаль возвращает значение.
Пример использования функции Length (s):
var s:string; //Описание переменной
begin // Начало программы
writeln ('Введите строку'); //Диалог с пользователем
readln (s); //Считывание строки
writeln ('Длина строки: ', length (s)); //Вывод длины строки
end. //Конец программыСкачать исходник: dlins.pas
Вторая функция, о которой пойдет речь в этом уроке, - функция определения позиции первого вхождения подстроки s1 в строке s2 Pos (s1,s2). S1 — строка (подстрока), которую нужно найти, s2 — строка, в которой нужно найти подстроку. S1 может быть задана как раньше в программе, так и в самой функции (в одинарных кавычках). Если s1 не входит в s2, то функция возвратит значение 0.
Пример простейшей программы на паскаль с использованием функции pos (s1, s2):
var s1, s2:string; //Описание переменных
begin //Начало программы
writeln ('Введите строку, в которой нужно найти:'); //Диалог с пользователем
readln (s2); //Считывание строки, в которой будем искать
writeln ('Введите строку, позицию которой нужно найти:'); //Диалог с пользователем
readln (s1); //Считывание подстроки, которую будем искать
writeln ('Позиция подстроки: ', pos(s1,s2 )); //Вывод позиции
end. //Конец программыСкачать исходник: dlins.pas
Две, уже рассмотренные, функции возвращали значение типа integer, следующие функции, про которые я расскажу, будут возвращать тип String.
Следующая функция, применимая к типу String — функция копирования определенной подстроки из строки Copy (s, p, n). S- строка, из которой нужно скопировать, p — позиция, начиная с которой необходимо копировать, n — сколько символов надо скопировать. S — строка, типа string, p, n — целочисленные, то есть типа integer.
Пример решения задачи Паскаль, с использованием функции копирования:
var s:string;
p,n: integer; //Описание переменных
begin //Начало программы
writeln ('Введите строку, из которой нужно скопировать:'); //Диалог с пользователем
readln (s); //Считывание строки
writeln ('Введите позицию и количество:'); //Диалог с пользователем
readln (p,n); //Считывание параметров для копирования
writeln ('Позиция подстроки: ', copy(s, p, n)); //Вывод нужного отрезка строки
end. //Конец программыСкачать исходник: dlins.pas
Последняя функция, о которой Вы узнаете из этого урока, - функция сложения строк Concat (s1, s2, …, s). Строки s1, s2, …, si записываются друг за другом в нужную строку. Если результат превысит 255 символов, то сложение прекратится. Пример данной функции будет опубликован позже в соответствующей категории.
На сегодня урок окончен. В уроках 19 и 20 я подробно рассказал про стандартные функции и процедуры Паскаль, применимые к строковому типу данных.