Объясните, пожалуйста, как составить матрицу. - Pascal ABC
Формулировка задачи:
Объясните,пожалуйста, как составлять a11,a12,a21 и a22
Решение задачи: «Объясните, пожалуйста, как составить матрицу.»
textual
Листинг программы
const n=2; var a:array[1..n,1..n] of real; ............................ a[1,1]:=y*(sin(x*y)/cos(x*y)+1)-2*x; a[1,2]:=x*(sin(x*y)/cos(x+y)+1); a[2,1]:=x; a[2,2]:=4*y;
Объяснение кода листинга программы
В данном коде объявляется переменная a, которая представляет собой массив размером 2 на 2, инициализируется значениями типа real.
Далее, в цикле выполняются следующие действия:
a[1,1]:=y*(sin(x*y)/cos(x*y)+1)-2*x;Здесь присваивается значениеyпеременнойa[1,1], после чего вычисляется выражениеsin(x*y)/cos(x*y)+1)и результат умножается наy. Затем из этого выражения вычитается значение2*x.a[1,2]:=x*(sin(x*y)/cos(x+y)+1);Здесь присваивается значениеxпеременнойa[1,2], после чего вычисляется выражениеsin(x*y)/cos(x+y)+1).a[2,1]:=x;Здесь присваивается значениеxпеременнойa[2,1].a[2,2]:=4*y;Здесь присваивается значение4*yпеременнойa[2,2]. Таким образом, в результате выполнения данного кода в массивеaбудут храниться значения: a[1,1] = y(sin(xy)/cos(xy)+1)-2x a[1,2] = x(sin(xy)/cos(x+y)+1) a[2,1] = x a[2,2] = 4*y