Лабораторна робота №11
Тема: Алгоритми і програми для обробки двовимірних масивів.
Мета: Формування умінь створення програм, які містять двовимірні масиви на алгоритмічній мові високого рівня Pascal.
1. Теоретичні відомості
Масив – це впорядкований скінченний набір даних одного типу, які зберігаються в послідовно розташованих комірках оперативної пам’яті і мають спільну назву. Назву масиву задає користувач. Двовимірний масив даних – це таблиця, що складається з декількох рядків і стовпців.
Елементи масиву визначаються іменем масиву та двома індексами: перший індекс означає номер рядка, а другий – номер стовпця, на перетині яких стоїть елемент. Доступ до елемента масиву здійснюється через назву масиву і номер елемента. Важливою характеристикою масиву є його розмір – загальна кількість елементів у масиві.
Щоб опрацювати елементи двовимірного масиву використовують команди вкладених циклів.
2. Хід роботи
2.1. Постановка задачі
Дано
квадратну
матрицю
.
Обчислити добуток елементів над головною
діагоналлю матриці та визначити їхню
кількість.
2.2. Графічний алгоритм показаний на рис.1 .
2.3. Таблиця ідентифікації змінних
-
Змінна
a
N
d
k
Ідентифікатор
a
n
d
k
ні
так
Рис.1. Графічний алгоритм
2.4. Програма мовою Pascal та результати обчислень
Program Двовимірні_масиви;
const
n=4;
Var
d:real;
i,j,k:integer;
a:array[1..n,1..n] of real;
Begin
writeln('Введіть елементи масиву');
for i:=1 to n do
for j:=1 to n do
begin
writeln('a[',i,',',j,']=');
read(a[i,j])
end;
writeln('Вихідні дані:');
for i:=1 to n do
begin
for j:=1 to n do
write(' ',a[i,j]:4:2);
writeln;
end;
d:=1; k:=0;
for i:=1 to n do
for j:=1 to n do
if i<j then
begin
d:=d*a[i,j];
k:=k+1
end;
writeln('РЕЗУЛЬТАТИ ОБЧИСЛЕНЬ:');
writeln('Добуток елементів масиву над головною діагоналлю = ',d:5:2);
writeln('Кількість елементів масиву над головною діагоналлю = ',k:3);
end.
Вихідні дані:
4.00 7.00 3.00 2.00
8.00 3.00 7.00 5.00
4.00 5.00 7.00 4.00
2.00 7.00 4.00 2.00
РЕЗУЛЬТАТИ ОБЧИСЛЕНЬ:
Добуток елементів масиву над головною діагоналлю = 5880.00
Кількість елементів масиву над головною діагоналлю = 6