Matlab - script sobre Sistemas de Soluc. de Ecuaciones Line

% Sistema de ecuaciones lineales

% 2x + y = 5

% -x + 3y = 12

% Definir coeficientes y constantes

A = [2 1; -1 3];

B = [5; 12];

% Resolver el sistema

solucion = A \ B;

% Mostrar la solución

disp('Solución del sistema:');

disp(['x = ' num2str(solucion(1))]);

disp(['y = ' num2str(solucion(2))]);

% Sistema de ecuaciones lineales

% 2x + y = 5

% -x + 3y = 12

% Definir las ecuaciones en forma simbólica

syms x y

ecuacion1 = 2*x + y == 5;

ecuacion2 = -x + 3*y == 12;

% Resolver el sistema

solucion = solve([ecuacion1, ecuacion2], [x, y]);

% Graficar las ecuaciones y la solución

ezplot(ecuacion1);

hold on;

ezplot(ecuacion2);

plot(solucion.x, solucion.y, 'ro');  % Marcar la solución en rojo

hold off;

% Etiquetas y leyenda

title('Gráfica de un Sistema de Ecuaciones Lineales');

xlabel('x');

ylabel('y');

legend('2x + y = 5', '-x + 3y = 12', 'Solución');

grid on;

% Sistema de ecuaciones lineales

% x + 2y - z = 8

% 2x - y + 3z = 1

% 3x + 3y + 2z = 10

% Definir la matriz de coeficientes y el vector de constantes

A = [1 2 -1; 2 -1 3; 3 3 2];

B = [8; 1; 10];

% Resolver usando el método de eliminación de Gauss

solucion_gauss = gauss_elimination(A, B);

% Resolver usando el método de la matriz inversa

solucion_inversa = inv(A) * B;

% Mostrar las soluciones

disp('Solución usando eliminación de Gauss:');

disp(solucion_gauss);

disp('Solución usando matriz inversa:');

disp(solucion_inversa);