Банк рефератов содержит более 364 тысяч рефератов, курсовых и дипломных работ, шпаргалок и докладов по различным дисциплинам: истории, психологии, экономике, менеджменту, философии, праву, экологии. А также изложения, сочинения по литературе, отчеты по практике, топики по английскому.
Полнотекстовый поиск
Всего работ:
364150
Теги названий
Разделы
Авиация и космонавтика (304)
Административное право (123)
Арбитражный процесс (23)
Архитектура (113)
Астрология (4)
Астрономия (4814)
Банковское дело (5227)
Безопасность жизнедеятельности (2616)
Биографии (3423)
Биология (4214)
Биология и химия (1518)
Биржевое дело (68)
Ботаника и сельское хоз-во (2836)
Бухгалтерский учет и аудит (8269)
Валютные отношения (50)
Ветеринария (50)
Военная кафедра (762)
ГДЗ (2)
География (5275)
Геодезия (30)
Геология (1222)
Геополитика (43)
Государство и право (20403)
Гражданское право и процесс (465)
Делопроизводство (19)
Деньги и кредит (108)
ЕГЭ (173)
Естествознание (96)
Журналистика (899)
ЗНО (54)
Зоология (34)
Издательское дело и полиграфия (476)
Инвестиции (106)
Иностранный язык (62792)
Информатика (3562)
Информатика, программирование (6444)
Исторические личности (2165)
История (21320)
История техники (766)
Кибернетика (64)
Коммуникации и связь (3145)
Компьютерные науки (60)
Косметология (17)
Краеведение и этнография (588)
Краткое содержание произведений (1000)
Криминалистика (106)
Криминология (48)
Криптология (3)
Кулинария (1167)
Культура и искусство (8485)
Культурология (537)
Литература : зарубежная (2044)
Литература и русский язык (11657)
Логика (532)
Логистика (21)
Маркетинг (7985)
Математика (3721)
Медицина, здоровье (10549)
Медицинские науки (88)
Международное публичное право (58)
Международное частное право (36)
Международные отношения (2257)
Менеджмент (12491)
Металлургия (91)
Москвоведение (797)
Музыка (1338)
Муниципальное право (24)
Налоги, налогообложение (214)
Наука и техника (1141)
Начертательная геометрия (3)
Оккультизм и уфология (8)
Остальные рефераты (21697)
Педагогика (7850)
Политология (3801)
Право (682)
Право, юриспруденция (2881)
Предпринимательство (475)
Прикладные науки (1)
Промышленность, производство (7100)
Психология (8694)
психология, педагогика (4121)
Радиоэлектроника (443)
Реклама (952)
Религия и мифология (2967)
Риторика (23)
Сексология (748)
Социология (4876)
Статистика (95)
Страхование (107)
Строительные науки (7)
Строительство (2004)
Схемотехника (15)
Таможенная система (663)
Теория государства и права (240)
Теория организации (39)
Теплотехника (25)
Технология (624)
Товароведение (16)
Транспорт (2652)
Трудовое право (136)
Туризм (90)
Уголовное право и процесс (406)
Управление (95)
Управленческие науки (24)
Физика (3463)
Физкультура и спорт (4482)
Философия (7216)
Финансовые науки (4592)
Финансы (5386)
Фотография (3)
Химия (2244)
Хозяйственное право (23)
Цифровые устройства (29)
Экологическое право (35)
Экология (4517)
Экономика (20645)
Экономико-математическое моделирование (666)
Экономическая география (119)
Экономическая теория (2573)
Этика (889)
Юриспруденция (288)
Языковедение (148)
Языкознание, филология (1140)

Статья: Интервальные типы данных. Оператор TYPE. Массивы

Название: Интервальные типы данных. Оператор TYPE. Массивы
Раздел: Рефераты по информатике, программированию
Тип: статья Добавлен 10:10:00 20 октября 2008 Похожие работы
Просмотров: 661 Комментариев: 2 Оценило: 0 человек Средний балл: 0 Оценка: неизвестно     Скачать

С.А. Григорьев

Интервальный тип - это некоторый подтип порядкового типа данных (вспомним, что порядковые типы - это ShortInt, Byte, Integer, Word, LongInt, Char и Boolean). Пусть, например, некоторая переменная в программе может принимать значения от -1 до 99. Мы могли бы описать ее как LongInt или Integer (глупо!), могли бы описать ее как ShortInt, что достаточно разумно. Но можно создать для нее и специальный тип данных, объединяющий только числа от -1 до 99 :

VAR x : -1..99;

Вместо имени одного из стандартных типов мы использовали в описании переменной построенный нами собственный интервальный тип. Таким образом описанная переменная x может принимать только значения -1,0,1,...,99 , в остальном она ничем не отличается от других целых переменных. Ее можно вводить, выводить, использовать в качестве переменной цикла, подставлять в выражения и т.п. Любой интервальный тип есть подтип некоторого стандартного базового типа, в нашем случае - типа ShortInt. Но если бы мы стали использовать интервальный тип -1..200 , то он бы уже был подтипом типа Integer, а 0..200 - подтипом типа Byte. Компилятор Паскаля самостоятельно анализирует интервальные типы и подбирает для них минимальный подходящий базовый тип. Это нужно знать, чтобы определять размер и способ кодировки ваших переменных. Вы можете выполнить оператор

WRITE('переменная x:-1..99 занимает ',SizeOf(x),' байт');

и убедиться, что ее размер действительно равен 1.

В качестве базового типа можно использовать не только арифметические типы, но и типы Char и Boolean (правда, в последнем случае это довольно бессмысленно). Опишем, например, переменную, значением которой могут быть только маленькие латинские буквы :

VAR Letter : 'a'..'z';

или переменную, в которой могут храниться русские буквы:

VAR RusLetter : 'А'..'я';

В общем случае интервальный тип описывается как

константное выражение 1 .. константное выражение 2,

где оба выражения имеют один порядковый тип и второе из них не меньше первого. Созданным вами типам вы можете давать имена, для этого используется оператор TYPE :

TYPE имя типа=описание типа;

Операторы TYPE так же, как и все другие операторы описания, записываются в разделе описаний. В программе может быть сколько угодно операторов TYPE, и их можно чередовать с другими операторами описания, но любые идентификаторы, использованные в описании типа, должны быть описаны раньше. После того, как некоторый тип получил имя, вы в дальнейшем можете пользоваться этим именем вместо полного описания типа :

CONST Tmin=-5;

Tmax=15;

TYPE T_Range_Type=Tmin..Tmax;

VAR t:T_Range_Type;

TYPE T_Range_SubType=Tmin+3..Tmax-5;

VAR t1:T_Range_SubType;

Заметим, что хороший программист всегда дает имена собственным типам, причем старается, чтобы эти имена были осмысленными.

Теперь, зная об интервальных типах, мы можем говорить о массивах. Массив во всех языках программирования - это множество индексированных (пронумерованных) однотипных элементов. В Паскале описание одномерного массива имеет вид:

ARRAY [тип индекса] OF тип элемента

Здесь тип индекса - ShortInt, Byte, Char, Boolean или интервальный тип; тип элемента - любой тип, в том числе и массив. Вы заметили, что не все порядковые типы можно использовать как тип индекса, это не значит, что, например, тип Word чем-то хуже типа Byte. Такое ограничение обусловлено тем, что в Паскале никакой объект не может иметь размер больше (64К - 2) байта, или 65534 байта. Это ограничение действует и для интервальных типов, так вы можете описать массив VAR a : ARRAY[1..65534] OF BYTE;

нонемассив VAR a : ARRAY[1..65535] OF BYTE;

инемассив VAR a : ARRAY[1..33000] OF WORD;

Больше никаких ограничений на тип индекса не накладывается. Тип элементов массива может быть любым - целочисленным, вещественным, символьным, логическим, интервальным. Элементы массива могут быть массивами, тогда вы получите массив размерностью больше чем 1. Опишем несколько массивов:

VAR a : ARRAY[Char] OF 1..5;

- массив из 256 элементов, каждый из которых есть целое число от 1 до 5, индексы элементов изменяются от #0 до #255;

CONST Max = 99;

Min = 10;

TYPE Nums = Min..Max;

TYPE ArrayType = ARRAY[-10..0] OF Nums;

VAR a : ArrayType;

- массив из 11 элементов с индексами от -10 до 0, каждый элемент - целое положительное число из двух цифр;

TYPE IndexType = 'a'..'z';

VAR a : ARRAY[IndexType] OF BOOLEAN;

- массив из 26 элементов с индексами от 'a' до 'z', каждый элемент - логическая переменная.

В программе вы можете использовать как массивы целиком, так и отдельные элементы массивов. Элемент одномерного массива записывается в виде:

имя массива [ индексное выражение ]

Индексное выражение - это любое выражение соответствующего типа. Если элемент массива - не массив, то с ним можно выполнять любые операции, разрешенные для простых переменных соответствующего типа. Целому массиву можно лишь присваивать массив того же типа. Заметим, что если массивы описаны в программе таким образом:

VAR a : ARRAY[1..3] OF REAL;

b,c,d : ARRAY[1..3] OF REAL;

TYPE Massiv=ARRAY[1..3] OF REAL;

VAR e,f : Massiv;

g : Massiv;

h,i : Massiv;

то массивы b,c,d - однотипные и массивы e,f,g,h,i тоже однотипные, но массивы a и b (a и c,a и d) имеют разный тип; и массивы b (c,d,a) и e (f,g,h,i) тоже имеют разный тип! Компилятор считает, что две переменные имеют один и тот же тип, только если они описаны в одном операторе через запятую, либо имена их типов одинаковы! Запомните это очень важное правило.

Запишем пример программы, использующей (пока одномерные) массивы:

{ программа вводит массив из N целых чисел, где N не превосходит 20, и выводит его в порядке неубывания }

CONST Nmax=20;

TYPE IndexType=1..Nmax;

Massiv=ARRAY[IndexType] OF Integer;

VAR a : Massiv; i,j,N : IndexType; t : Integer;

BEGIN WRITELN;

REPEAT WRITE('Введите длину массива от 1 до ',Nmax,' ');

READ(N); WRITELN;

UNTIL (N>=1)AND(N<=Nmax);

{ Вводим массив поэлементно }

WRITELN('Введите элементы массива');

FOR i:=1 TO N DO READ(a[i]);

{ Сортируем элементы массива по неубыванию. Используем очень простой, но

неэффективный алгоритм сортировки - сравниваем каждый элемент с каждым

и, если первый больше второго, меняем их местами }

FOR i:=1 TO N-1 DO FOR j:=i+1 TO N DO

IF a[i]>a[j] THEN BEGIN t:=a[i]; a[i]:=a[j]; a[j]:=t; END;

{ Выводим отсортированный массив поэлементно }

WRITELN('Результат сортировки :');

FOR i:=1 TO N DO WRITE(a[i]:8);

END.

Обратите внимание на алгоритм перестановки двух элементов! Запись a[i]:=a[j]; a[j]:=a[i]; , очевидно, привела бы к неверному результату. Использованный нами алгоритм сортировки вполне надежен, но не очень хорош, так как выполняет много лишних операций. Не составляет труда усовершенствовать его - для каждого i от 1 до N-1 найдем наименьший из элементов ai, ai+1, ... , aN и поместим его на i-е место; такой алгоритм выполняет столько же сравнений, сколько и первоначальный, но требует существенно меньшего количества перестановок.

FOR i:=1 TO N-1 DO BEGIN

a_max:=a[i]; n_max:=i;

FOR j:=i+1 TO N DO

IF a[j]<a_max THEN BEGIN a_max:=a[j]; n_max:=j; END;

IF n_max<>i THEN BEGIN a[n_max]:=a[i]; a[i]:=a_max; END;

END;

Как видите, запись алгоритма несколько длиннее, и потребовалось две новых переменных a_max - типа Integer и n_max - типа IndexType. Это действие универсального закона сохранения - из двух верных алгоритмов лучший, как правило, сложнее.

Теперь перейдем к рассмотрению многомерных массивов. Размерностью, или количеством измерений массива, называется количество индексов у элемента массива, но не количество элементов в массиве. Мы уже знаем, что элемент массива может быть массивом, поэтому двумерный массив можно описать, например, так :

VAR a : ARRAY[1..10] OF ARRAY[1..20] OF Real;

Переменную a можно рассматривать как одномерный массив одномерных массивов и использовать в программе запись вида a[i] ; но можно рассматривать и как двумерный массив вещественных чисел. Элемент этого массива записывается в программе в виде a[ индексное выражение , индексное выражение ] и является переменной типа Real, например, a[i+1,3]. Впрочем, можно записать и так: a[i+1][3], обе эти записи эквивалентны. Описание многомерных массивов также можно записывать компактно: вместо

ARRAY[ t1 ] OF ARRAY[ t2 ] OF ARRAY ... OF t ;

можно записать

ARRAY[ t1 , t2 , ... ] OF t ;

Впрочем, бывают случаи, когда первое описание предпочтительней. Теперь, умея работать с многомерными массивами, напишем программу, перемножающую две квадратные вещественные матрицы:

CONST Nmax=20; {максимальный размер матрицы}

TYPE IndexType=1..Nmax;

Matrix =ARRAY[IndexType,IndexType] OF Real;

VAR a,b,c : Matrix; n,i,j,k : IndexType;

BEGIN WRITE('введите размер матриц '); READ(n);

IF (n<1)OR(n>Nmax) THEN BEGIN

WRITELN('неверный размер!'); Halt; END;

WRITELN('введите матрицу A построчно ');

FOR i:=1 TO n DO FOR j:=1 TO n DO READ(a[i,j]);

WRITELN('введите матрицу B построчно ');

FOR i:=1 TO n DO FOR j:=1 TO n DO READ(b[i,j]);

FOR i:=1 TO n DO FOR j:=1 TO n DO BEGIN

c[i,j]:=0; FOR k:=1 TO n DO c[i,j]:=c[i,j]+a[i,k]*b[k,j]; END;

WRITELN('матрица A*B :');

FOR i:=1 TO n DO FOR j:=1 TO n DO WRITE(c[i,j]);

WRITELN;

END.

Наша программа сработала правильно, но полученную матрицу вывела плохо - все элементы подряд без деления на строки. Исправималгоритмвывода:

FOR i:=1 TO n DO BEGIN

FOR j:=1 TO n DO WRITE(c[i,j]:8);

WRITELN;

END;

Теперь матрица выводится аккуратно.

В Паскале допускаются типизированные константы - массивы, список значений элементов массива задается в круглых скобках и разделяется запятыми:

CONST a : ARRAY[1..5] OF Byte=(1,2,3,4,5);

c : ARRAY[0..3] OF Char=('a','b','c','d');

b : ARRAY[-1..1] OF Boolean=(FALSE,TRUE,FALSE);

Символьные массивы можно инициализировать и более простым способом:

CONST c : ARRAY[0..3] OF Char='abcd';

Если инициализируется многомерный массив, то, поскольку каждый его элемент есть массив, нужно использовать вложенную скобочную структуру:

CONST A : ARRAY[1..3,1..2] OF Real = ((0,1),(2,4),(3,5));

Каким именно образом сгруппировать значения элементов, легко понять, вспомнив, что массив ARRAY[1..3,1..2] OF Real есть на самом деле компактная запись описания ARRAY[1..3] OF ARRAY[1..2] OF Real.

Итак, мы узнали, что кроме величин известных нам арифметических, символьного, логического типа и интервальных типов, каждая из которых имеет одно значение, существуют массивы - совокупности многих значений. Первые величины называются скалярными, а массивы и ряд других типов, пока нам не известных, структурированными величинами.

Оценить/Добавить комментарий
Имя
Оценка
Комментарии:
Где скачать еще рефератов? Здесь: letsdoit777.blogspot.com
Евгений07:17:32 19 марта 2016
Кто еще хочет зарабатывать от 9000 рублей в день "Чистых Денег"? Узнайте как: business1777.blogspot.com ! Cпециально для студентов!
12:55:00 25 ноября 2015

Работы, похожие на Статья: Интервальные типы данных. Оператор TYPE. Массивы

Назад
Меню
Главная
Рефераты
Благодарности
Опрос
Станете ли вы заказывать работу за деньги, если не найдете ее в Интернете?

Да, в любом случае.
Да, но только в случае крайней необходимости.
Возможно, в зависимости от цены.
Нет, напишу его сам.
Нет, забью.



Результаты(149897)
Комментарии (1829)
Copyright © 2005-2016 BestReferat.ru bestreferat@mail.ru       реклама на сайте

Рейтинг@Mail.ru