%%%--------------------------------------------------------------------------%%%
%%%                               Item 5 e 6                                 %%%
%%%--------------------------------------------------------------------------%%%
clear
clc

A0 = [15 2 3 4; 2 5 7 5; 3 7 9 6; 4 5 6 7];

% funcao pronta do MATLAB/Octave que calcula autovalores de A0
l    = eig(A0);

% maior autovalor de A0 calculado utilizando o metodo da potencia
lmax = potencia(A0);

% menor autovalor de A0 calculado utilizando o metodo da potencia inversa
lmin = potencia_inv(A0);

printf("Os autovalores calculados pelo MATLAB/Octave sao [%f %f %f %f].\n", l(1), l(2), l(3), l(4))

printf("O maior autovalor obtido pelo metodo da potencia foi %f.\n", lmax)

printf("O menor autovalor obtido pelo metodo da potencia inversa foi %f.\n", lmin)

%%%--------------------------------------------------------------------------%%%