ЛЕКЦИЯ 6 Тема Структурные типы Строки

ЛЕКЦИЯ 6 Тема: «Структурные типы. Строки. »

ТИПЫ ДАННЫХ Тип данных (data type) — множество величин, объединенных определенной совокупностью допустимых операций. Тип данных имеет имя, диапазон допустимых значений и объём занимаемой памяти.

Типы данных Простые типы (скалярные типы) Структурированные типы

типы Стандартные типы Пользовательские типы Целые типы Перечисляемый тип Вещественные типы Интервальный тип (диапазонный тип) Логический тип (boolean ) Символьный тип (char )

Простые типы Целые типы Вещественные типы Логический тип (boolean ) Символьный тип (char )

Структурированные типы данных это типы данных, значения величин которых, имеют в своём составе данные других типов. Строковый тип (string) Регулярный тип массивы(array) Комбинированный тип (record) Множественный тип (set) Файловый тип (file)

Строковый тип данных String Тип String Диапазон значений Последовательность символов от одного до 255 , заключённая в апострофы Требуемая память (байт) 1. . 255

Способы объявления строк Способ Длина строки Пример var <идентификатор>: string [максимальная длина строки ]; 255 var St : string; var <идентификатор>: string (<длина строки> ) ; Пользовательская, в пределах максимальной var St : string(25); type <имя типа> = string [максимальная длина строки]; var <идентификатор> : <имя типа>; type Stroke = string ; var St : Stroke;

var Stl : string; St 2, St 3: string[50]; type Plot = string[125]; var Fstr : Plot; Nazv : string[280]; //Ошибка, длина Nazv превышает 255

Операции над строками Операция Назначение Пример Сцепления Объединен (+) ие строк Операции отношения Сравнение : =, <>, >, строк <, >=, <= Результат Str 1 : = 'Группа '; Str 2 : = Str 1 + ' МЧМ Str 2 : = ‘Группа МЧМ '; 'MS DOS‘ < 'MS Dos‘ True

Процедуры для строк Процедура Назначение Пример Результат Delete (St, Poz, N) удаление N сиvволов строки St, начиная с позиции Poz. St: ='река Волга‘; Delete(Str, 1, 5); значение Poz > 255, возникает программное прерывание St= 'река‘ вставка строки Str 1 в строку Str 2, Insert (Str 1, Str 2, Poz) начиная с позиции Poz. S 1 : = ' ЕС '; S 2 : = 'ЭВМ 1841'; S 2 : = ‘ЭВМ 1841 ЕС '; Insert(S 1, S 2, 7); Str (Ch, St) преобразование числового значения величины Ch и помещение результата в строку St. Ch: =1500; Str (Ch, St); St=‘ 1500’ Val (St, Ch, Code) преобразует значение St в величину целочисленного или вещественного типа и помещает результат в Ch. Значение St не должно содержать незначащих пробелов в начале и в конце. St: ='1450'; Val(St, Ch, Code) Code=0, Ch=1450,

Функции для строк Функции Назначение Пример St: =‘река Волга‘; N=Length(St); вычисляет текущую длину в символах St: =‘В ‘; строки St. Результат имеет Length (St) N: =Length(St); целочисленный тип St: =‘‘; N: =Length(St); выделяет из St подстроку длиной N St: =‘Волга река’; Copy (St, Poz, N) символов, начиная St 1: =Copy(St, 7, 4) ; с позиции Poz. обнаруживает первое появление в строке Str 2 подстроки Str 1. Результат St: =‘Волга река’; Pos (Str 1, Str 2) имеет целочисленный тип и равен N: =Pos(‘рeк', St); номеру той позиции, где находится первый символ подстроки Str 1. выполняет сцепление строк St 1, St 1: = 'AA‘; St 2: = Concat St 2, . . , Stn в том порядке, в каком они 'XX‘; (St 1, St 2, . . . , Stn) указаны в списке параметров. Сумма символов всех сцеплен ных строк не St 3: =Concat (St 1, St 2, 'Y'); должна превышать 255 преобразует строчную букву в St: =‘Волга река’; прописную. Параметр и резуль тат Up. Case (St) имеют литерный тип. Обрабатывает St 1: =Up. Case( St); буквы только латинского алфавита Результат N=10 N=1 N=0 St 1=‘река’ N=7 St 3=‘AAXXY’ St 1=‘ВОЛГА РЕКА’

Строковые процедуры. Процедура Delete (St, Poz, N) St: ='река Волга‘; Delete(Str, 1, 5); St=? St= 'река олга‘;

Процедура Insert (Strl, Str 2, Poz) var S 1, S 2 : stringt[11]; begin S 1 : = ' ЕС '; S 2 : = 'ЭВМ 1841'; Insert(S 1, S 2, 7); end. S 1=? S 1='ЭВМ 1841 ЕС '

Процедура Str (Ch, St) Ch: =1500; Str (Ch, St); St = ? St = ‘ 1500’

Процедура Val (St, Ch, Code) – St: ='1450' ; Val(St, Ch, Code) Ch=1450, St: = '14. 2 Е+02‘; Val (St, Ch, Code) Ch=14. 2 E+02, St: ='14. 2 A+02’; Val (St, Ch, Code) Ch не определено, Code=5 Code=0

Функция Length (St) – St: =‘река Волга‘; N: =Length(St); Write. Ln (N) N=10 St: =‘*‘; N: =Length(St); Write. Ln (N) N=1 St: =‘‘; N: =Length(St); Write. Ln (N) N=0

Функции Copy (St, Poz, N), Pos (Str 1, Str 2) Copy (St, Poz, N) Pos (Str 1, Str 2) Var St, St 1: string; Begin St: =‘река’; St 1: =Copy(St, 3, 2); Write. Ln(St 1) End. Var St: string; N: integer; begin St: =‘река’; N: =Pos('eк', St); Write. Ln (N) End. St 1=‘ка’ N=1

Функция Concat (Stl, St 2, . . . , Stn) Concat (St 1, St 2, . . . , Stn) – Var St 1, St 2, St 3: string; Begin St 1: = 'AA‘; St 2: = 'XX‘; St 3: =Concat (St 1, St 2, 'Y'); Write. Ln (St 3) end. St 3= ? St 3=‘AAXXY’

Функция Up. Case (Ch) Var St, St 1: string; begin St: =‘река’; St 1: =Up. Case (St); Write. Ln(St 1) end. St 1=? St 1=‘РЕКА’