КАТЕГОРИИ: Архитектура-(3434)Астрономия-(809)Биология-(7483)Биотехнологии-(1457)Военное дело-(14632)Высокие технологии-(1363)География-(913)Геология-(1438)Государство-(451)Демография-(1065)Дом-(47672)Журналистика и СМИ-(912)Изобретательство-(14524)Иностранные языки-(4268)Информатика-(17799)Искусство-(1338)История-(13644)Компьютеры-(11121)Косметика-(55)Кулинария-(373)Культура-(8427)Лингвистика-(374)Литература-(1642)Маркетинг-(23702)Математика-(16968)Машиностроение-(1700)Медицина-(12668)Менеджмент-(24684)Механика-(15423)Науковедение-(506)Образование-(11852)Охрана труда-(3308)Педагогика-(5571)Полиграфия-(1312)Политика-(7869)Право-(5454)Приборостроение-(1369)Программирование-(2801)Производство-(97182)Промышленность-(8706)Психология-(18388)Религия-(3217)Связь-(10668)Сельское хозяйство-(299)Социология-(6455)Спорт-(42831)Строительство-(4793)Торговля-(5050)Транспорт-(2929)Туризм-(1568)Физика-(3942)Философия-(17015)Финансы-(26596)Химия-(22929)Экология-(12095)Экономика-(9961)Электроника-(8441)Электротехника-(4623)Энергетика-(12629)Юриспруденция-(1492)Ядерная техника-(1748) |
Приклад 11.1
Масиви Значення масивового типу позначають одним (груповим) ім’ям, а доступ до кожного з елементів масиву організовується за допомогою цього групового імені та порядкового номера (індексу) необхідного елемента масиву. Ім’я масиву Ім’я масиву утворюється так само, як ім’я змінної (літери або літери і цифри та символів підкреслювання). В залежності від кількості індексів розрізняють одновимірні та двовимірні, тривимірні масиви і т.і. Індекси масивів Індекси розміщуються після ідентифікатору змінної в квадратних дужках і розділяються між собою комами, якщо їх більше ніж один. В якості індексу можна використовувати: сталу, змінну чи вираз ординального типу. Наприклад, Х[1]; Z[N]; K[2*N+5]. Одновимірні масиви Запис елементів одновимірного масиву Z мовою PASCAL матиме вигляд Z[1] – перший елемент одновимірного масиву Z, Z[20] – двадцятий елемент одновимірного масиву Z. Об’ява масивів Якщо в програмі використовується масив, то в розділі об’яв програми повинна бути описана розмірність (задана кількість елементів) цього масиву та тип значень елементів масиву (тобто тип значень змінних, з яких складається масив). Розмірність масиву Розмірність вказується в квадратних дужках після зарезервованого слова ARRAY і визначає максимальну кількість елементів, які можна розмістити у масиві. Після зарезервованого слова OF вказується тип елементів масиву. Приклад об’яви одновимірного масиву: об’являє одновимірний масив D, який має розмірність 25, тобто містить 25 елементів, найменшим значенням індексу є 1, а найбільшим – 25. Елементи масиву можуть приймати тільки значення дійсного типу REAL. Приклади об’яви одновимірних масивів: program masprit; const n=10; var c: array[1..15] of char; b: array[1.. n] of boolean; col1:array[1..15] of integer; Операції над масивами До масиву як єдиного цілого можна застосувати операцію привласнення. В цьому випадку масиви мають бути одного й того самого типу. В результаті виконання інструкції а:=b, усі значення елементів масиву b будуть привласнені відповідним елементам масиву а. Всі інші дії над масивами не визначені. Будь-яка обробка масивів, а також операції введення-виведення масивів здійснюється поелементно. Поелементну обробку масивів можна виконати лише за допомогою інструкцій циклу. Введення значень одновимірного масиву В Введення значень одновимірного масиву В, який складається з 10 елементів, можна здійснити з допомогою наступних інструкцій: FOR J=1 TO 10 DO READ(B[ J ]); Дано const m=15; var c: array[1..15] of char; b: array[1..m] of boolean; Надати елементам масиву В значення TRUE, якщо відповідний елемент заданого масиву С цифра і значення FALSE у протилежному випадку. Схему алгоритма представлено на рис.11.1. Використовувані типи даних В даному прикладі для опису масивів використовуються, як стандартні типи: integer, byte, char так і типи, задані користувачем: 1..n, 1..15 - інтервальні.
Рис.11.1 program digit; const m=15; var c: array[1..15] of char; b: array[1..m] of boolean; i:integer; f: text; begin assign(f,'masiv1d.pas'); reset(f); for i:=1 to m do read(f,c[i]); i:=0; while i<=m do begin i:=i+1; if (c[i]>='0') and (c[i]<='9') then b[i]:=true else b[i]:=false; end; for i:=1 to m do writeln(c[i],' ',b[i]); end.
Дата добавления: 2014-01-07; Просмотров: 357; Нарушение авторских прав?; Мы поможем в написании вашей работы! Нам важно ваше мнение! Был ли полезен опубликованный материал? Да | Нет |