Полезное:
Как сделать разговор полезным и приятным
Как сделать объемную звезду своими руками
Как сделать то, что делать не хочется?
Как сделать погремушку
Как сделать так чтобы женщины сами знакомились с вами
Как сделать идею коммерческой
Как сделать хорошую растяжку ног?
Как сделать наш разум здоровым?
Как сделать, чтобы люди обманывали меньше
Вопрос 4. Как сделать так, чтобы вас уважали и ценили?
Как сделать лучше себе и другим людям
Как сделать свидание интересным?
Категории:
АрхитектураАстрономияБиологияГеографияГеологияИнформатикаИскусствоИсторияКулинарияКультураМаркетингМатематикаМедицинаМенеджментОхрана трудаПравоПроизводствоПсихологияРелигияСоциологияСпортТехникаФизикаФилософияХимияЭкологияЭкономикаЭлектроника
|
Стандартные процедуры и функции
Рассмотрим наиболее важные процедуры и функции, предназначенные для обработки строк: Функция Copy (S, Pozition, N) копирует из строки S подстроку длиной N символов, начиная с позиции Pozition. При этом исходная строка не меняется. Здесь N и Pozition — целочисленные выражения. Пример:
Функция Concat (S1, S2, …, SN) выполняет сцепление (конкатенацию) строк S1, S2, …, SN в одну строку. Пример:
Функция Length (S) — определяет текущую длину строки S. Результат — значение целого типа. Пример:
Функция Pos (S1, S2) — обнаруживает первое появление в строке S2 подстроки S1. Результат — целое число, равное номеру позиции, где находится первый символ подстроки S1. Если в S2 подстроки S1 не обнаружено, то результат равен 0. Пример:
Процедура Delete (S, Poz, N) — удаление N символов из строки S, начиная с позиции Poz. В результате выполнения процедуры уменьшается текущая длина строки в переменной S. Пример:
Процедура Insert (S1, S2, Poz) — вставка строки S1 в строку S2, начиная с позиции Poz. Пример:
Для примера описания строкового типа данных приведем пару примеров: 1. программа выводит на экран длину введенной пользователем строковой величины. Program Str1; Var S: String; Begin Writeln('Введите последовательность символов'); Readln(S); Writeln('Вы ввели строку из ',Length(S), ' символов') End. 2. Введенную строку вывести на экран по одному символу в строке экрана. Program Str2; Var S: String; I: Byte; Begin Writeln('Введите строку'); Readln(S); For I:=1 to Length(S) do {организуем цикл, начиная с первого символа} Writeln(S[I]) {строки, до последнего (номер последнего} {совпадает с количеством символов строки S) } End. Глава II
Date: 2015-07-02; view: 361; Нарушение авторских прав |