Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Lab6.doc
Скачиваний:
1
Добавлен:
08.05.2019
Размер:
145.41 Кб
Скачать

МІНІСТЕРСТВО ОСВIТИ І НАУКИ, МОЛОДІ ТА СПОРТУ УКРАЇНИ

НАЦІОНАЛЬНИЙ УНІВЕРСИТЕТ "ЛЬВІВСЬКА ПОЛІТЕХНІКА"

ПРОГРАМУВАННЯ З ВИКОРИСТАННЯМ

ОПЕРАТОРА ЦИКЛУ З ПАРАМЕТРАМИ ТА

ДВОМІРНОГО МАСИВУ

Методичні вказівки

для самостійної підготовки та інструкція до лабораторної роботи № 6

з навчальної дисципліни "Обчислювальна техніка та алгоритмічні мови", частина 2, для студентів напряму підготовки 6.050701 "Електротехніка та електротехнології" усіх форм навчання

Затверджено

на засіданні кафедри

електричних систем та мереж

Протокол № ­___ від___________ 2011 р.

Зареєстровано № _____

від "___"_________ 2011 р.

Львів 2011

Програмування з використанням оператора циклу з параметрами та двомірного масиву: Методичні вказівки для самостійної підготовки та інструкція до лабораторної роботи № 6 з навчальної дисципліни "Обчислювальна техніка та алгоритмічні мови", частина 2, для студентів напряму підготовки 6.050701 "Електротехніка та електротехнології" усіх форм навчання /Укл.: Я.Д. Пришляк. – Львів: Національний університет "Львівська політехніка", 2011. – 12 с.

Укладач Пришляк Я.Д., канд. техн. наук, доц.

Відповідальний за випуск Лисяк Г.М., канд. техн. наук, доц.

Рецензент Варецький Ю.О., д-р. техн. наук, проф.

1. Методичні вказівки для самостійної підготовки

1.1. Двомірний масив

Щоб звернутись до конкретного елемента двомірного масиву, потрібно вказати ім’я масиву і індекси елемента в квадратних дужках розділені комою. Індекси елемента повинні належати до відповідних діапазонів < тип індексів >, вказаних в описі цього масиву. Перший індекс вказує на номер рядка, а другий на номер стовпця.

Приклад:

var BВ:array [1..2,1..3] of integer;

begin

. . . .

BВ[1,2]:=10;

BВ[2,2]:=BВ[1,2]+BВ[2,1];

{ Неправильні звертання }

BВ[3,1]:=12; { перший індекс виходить за межі діапазону }

BВ[1,4]:=0; { другий індекс виходить за межі діапазону};

BB[1]:=100; { масив описаний як двомірний, а в звертанні

присутній тільки один індекс }

end.

Задати значення елементів двомірного масиву, наприклад, можна трьома способами:

- за допомогою ключового слова const, після якого через пропуск вказується ім’я масиву, cимвол < : >, ключове слово array, за яким в квадратних дужках вказується тип індексів, ключове слово of та через пропуск тип елементів масиву, далі символ < = >, за яким в круглих дужках через кому записуються значення елементів масиву по рядках. Рядки заключаються в круглі дужки і розділяються між собою комами. Необхідно пам’ятати, що при такому описі масиву змінювати значення його елементів в тілі програми не можна.

Приклад:

const CС:array [1..2,1..2] of integer=((1,2),(3,4));

begin

. . .

CС[1,1]:=2; { таке присвоєння не допускається }

end.

- шляхом присвоєння елементам масиву їх значень в тілі програми.

Приклад:

var CC:array [1..2,1..2] of integer;

begin

CC[1,1]:=1; CC[1,2]:=2; CC[2,1]:=3; CC[2,2]:=4;

. . .

end.

- шляхом вводу з клавіатури значень елементів масиву через пропуск по рядках.

Приклад:

var СС:array [1..2,1..2] of integer;

I,J:integer;

begin

for I:=1 to 2 do

for J:=1 to 2 do readln(CC[I,J]);

. . .

end.

Фрагмент програми містить два цикли. Цикл по J називають внутрішнім, цикл по I – зовнішнім. При фіксованому значенні I змінна J змінюється від 1 до 2. Потім змінна I збільшується на 1, а змінна J знову змінюється від 1 до 2 і так далі. Якщо потрібно ввести масив по стовпцях, то зовнішній цикл повинен бути по стовпцях, а внутрішній по рядках.

Виведення значень двомірного масиву СС у вигляді матриці можна здійснити наступним чином:

. . . . . . . . . .

for I:=1 to 2 do begin

for J:=1 to 2 do

write (' ',CC[I,J]:1:2);

writeln; { перевід курсору на новий рядок}

end;

. . . . . . . . . . .

На екрані виведеться:

1 2

3 4

Елементи масивів можуть обчислюватись за формулами. Наприклад, потрібно утворити двомірний масив та вивести його на друк, якщо .

program utvor_masiv;

{$APPTYPE CONSOLE}

uses

SysUtils;

var Z:array [1..2,1..2] of real;

I,J:integer;

begin

for I:=1 to 2 do { обчислення елементів

for J:=1 to 2 do Z[I,J]:=exp(I)*sin(J); масиву за формулою }

{ виведення утвореного масиву на друк}

for I:=1 to 2 do

begin

for J:=1 to 2 do write (' ',Z[I,J]:0:1); writeln;

end;

readln;

end.

Після виконання програми на екрані буде виведено:

2.3 2.5

6.2 6.7

Соседние файлы в предмете [НЕСОРТИРОВАННОЕ]