Работа с символьными переменнымиВ Turbo Pascal 7.0 для работы с символами используются два типа переменных:
символьный тип данных;
строковый тип данных.
Стандартные функции для работы с символьными величинами:
Операция сложения символьных величин.
Операция сложения позволяет строить из двух символьных строк третью, состоящих из символов первой, за которой следуют символы второй. Обозначается эта операция знаком "+". Наример:
Описываем строковые переменные.
vars1, s2, s3: string;
Присваиваемое значение строки заключается в апострофы. Присвоим первым двум следующие значения, а третья будет равна их склеиванию:
s1: = ' Тише воды, ';
s2:= 'нижетравы’;
s3:=s1+’’+s2;
Строка s3 имеет значение 'Тише воды, ниже травы'.
Длина строки
Под длиной строки понимается количество введенных символов, но она не может превышать максимально возможной длины (в описательной части). Это значение можно определить при помощи функции, результат которой целое число, равное количеству символов.
Например:
s1:='12345'; s2:= 'Семеро одного не ждут’; k1:=Length(s1); k2:=Length(s2).
В результате значения целых переменных будут равны: kl=5, k2=21.
Копирование
Функция copy(str,n,m) в Turbo Pascal – копируют тсимволов строки str, начиная с n-го символа, при этом исходная строка не меняется. Можно результат этой функции присваивать другой строке или сразу выводить его на экран. Например:
s1:='паровоз'; s2:='123456'; s3:=copy(s1, 5, 3); writeln(s3); writeln(copy(s2, 3, 2));
Значения переменной s1=’воз’. А на экране будут выведены следующие строки: воз и 34.
Удаление
В Turbo Pascal для этого используется процедура Delete(str, n,m), которая вырезает из строки str m символов, начиная с n-го. таким образом сама строка изменяется. Например:
Дан фрагмент программы:
s:='123456'; delete(s, 3, 2); writeln(s);
После выполнения этих операторов из строки будут удалены два символа, начиная с третьего, то есть строка будет такой: s = '1256'.
Замена (Вставка)
В Turbo Pascal это можно сделать, применяя процедуру Insert(s1,s2,n) – вставка строки s1 в строку s2, начиная с п-го символа, при этом первая строка остается такой же, как и была, а вторая получает новое значение. Например:
s1;='34': s2:='1256'; insert (s1, s2, 3);
В результате выполнения данной процедуры строка будет такой
s2='123456'.
Числа и строки
Надо заметить, что число 25 и строка 25 – это не одно и то же. Для работы с числами и строками в Turbo Pascal применяются две процедуры.
Str(n,s1) – переводит числовое значение n в строковое и присваивает результат строке s1, причем можно переводить как целые числа, так и вещественные. Например:
n:=12; str(n,s1); - после выполнения s1 ='12'
Существует обратная операция, переводящая строковое значение в числовое.
Функция val(s, n, k) – переводит строковое значение в числовое, если данная строка действительно является записью числа (целого или вещественного), то значение k=0, а n – это число, иначе k будет равно номеру символа, в котором встречается первое нарушение записи числа n. Например:
val(‘1234',n,k) п=1234, k=0;
Функции преобразования типов
Иногда в программах возникает необходимость по коду определить символ и, наоборот, по символу определить его код. Для этого используют функцию: CHR(x).
Эта функция возвращает символ, соответствующий ASCII-коду числа x. Например:
for i = 0 to 255 do writeln( i,' ', chr(i));
Для определения кода по символу используют функцию ORD. Например:
readln(s); writeln(ord(s));
Комбинированный тип данных (записи)
Запись - тип данных, состоящий из фиксированного числа компонентов (называемых полями) одного или нескольких типов.
Приведём примеры описания типа запись:
type Point=RECORD x,y: Real
END;
Dates=RECORD day : 1..31; mon : String[3]; year: 1..3000
END;
var p,r: Point;
dt: Dates;
Можно определить массив записей, поля которых также являются массивами:
type Student=Array [1..N] of Record fam : String[15]; birth: Dates; man : Boolean; marks: Array[1..10] of 0..5
end;
varGroup: Student;
Идентификатор Group можно использовать для хранения информации о группе студентов (фамилия, дата рождения, пол и оценки по 10 предметам).
Обращение к значению поля записи происходит при помощи составного имени, содержащего идентификатор переменной и имя поля, разделённые точкой. Например, p.x, dt.mon, group[1].man, group[2].marks[1].
Составное имя может использоваться везде, где допустимо применение идентификатора типа поля: в выражениях, операторах ввода-вывода, присваивания, в качестве фактических параметров.
Обращение к полю записи с помощью составного имени может иметь громоздкий вид. Оператор WITH, решающий эту проблему, имеет следующий вид:
WITH <Переменная типа запись> DO <Оператор>
Если после слова WITH задать имя записи, то в операторе, следующим за DO, для доступа к полю можно указывать только имя поля без имени переменной.
Записи с вариантами
Записи могут иметь варианты. В качестве примера приведём исследование для проверки качества некоторого лекарства. Если проверки не производится, то единственные данные, которые нас интересуют, - это применял ли данный пациент ранее данное лекарство. Если же производится проверка, то необходимо собрать сведения по большому числу данных относительно головной боли, лихорадки и тошноты.
Мы используем две структуры данных типа запись:
| Nomer |
| Proverka |
| GolovBol |
| Lihoradka |
| Toshnota |