% Основной скрипт для выполнения лаб работы (Вар 25)
clear; clc;

N = 6; 
M = 8; 

[I, J] = meshgrid(1:N, 1:M); 
I = I'; 
J = J';

Term1 = (sin(I).^3 - cos(J)).^3;
Term2 = 3.1 * log( abs((I - 7) ./ (J + 4)) - 9 ); 

A = Term1 + Term2;

disp('Матрица A успешно заполнена:');
disp(A);

x = VectorFunction(A);
disp('Вектор x (максимальные элементы квадратов столбцов):');
disp(x);

G = CalcG(x);
disp('Итоговое значение G:');
disp(G);