%% sistema de ecuaciones

clearvars;
clear all;
close all;
clc;

%% sistema de ecuaciones resolucion normal
%3x + 5y =  7
%2x -  y = -2

A =  3;
B =  5;
C =  7;
D =  2;
E = -1;
F = -2;

%segun la formula los resultados para las incognitas x , y son
%
%     C*E - B*F             A*F - C*D
% x = ---------         y = ---------
%     E*A - B*D             E*A - B*D

x = (C*E - B*F)/(E*A - B*D);
y = (A*F - C*D)/(E*A - B*D);

disp(' ');
disp('resolucion normal');
fprintf('x = %f    y = %f\n',x,y);
disp(' ');

%% resolucion por matrices
A = [ 3, 5 ;
      2 -1];

B = [ 7;-2];

X = inv(A)*B;
disp('resolucion matrices');
fprintf('X(1,1) = %f    X(2,1) = %f\n',X(1,1),X(2,1));
disp(' ');