Лістинг програми:

Program MULT; {перемноження двох матриць}

Const n=3; {задання розміру матриць}

Type Matr=array[1..n,1..n] of real; {задання двовимірного масиву}

{визначення вихідних матриць}

const A: Matr=((1.1,1.1,1.1),(2.1,2.1,2.1),(3.1,3.1,3.1));

B: Matr=((4.1,4.1,4.1),(3.1,3.1,3.1),(4.1,4.1,4.1));

{опис змінних, що використовуються}

var C: Matr; s: real; i,j: integer;

begin

for i:=1 to n do

for j:=1 to n do begin

S:=0;

for k:=1 to n do

S:=S+A[i, k]*B[k, j];

C[i, j]:=S;

end;

writeln (‘С=АВ’);

for i:=1 to n do begin

for j:=1 to n do

write (C[i, j]:4:1); writeln;

end; readln; end.

Контрольні питання

1. Як задається двомірний, багатомірний масиви?

2. Чи можна описувати багатомірні масиви безпосередньо в розділі опису змінних? Якщо можна, тоді як?

3. Як здійснюється звертання до елементів двомірних масивів?

4. Які дії можна виконувати над багатомірними масивами?  Над їх елементами?

5. Чи можуть <типи iндексів> багатомірних масивів бути різно­манітними?

Викладач ____________ М. О. Пашко

8