clc
disp(' Mátrixok kondiciószáma')
A = [3 4; -10 4]
%%
display(' *** 2-es normára vonatkozó kondíciószám:')
c_A = cond(A)                           % ez az alapértelmezett
%%
c_2_A = cond(A,2)
c_2_A = norm(A,2)*norm(inv(A),2)        % így is lehetne
%%
display(' *** 1-es normára vonatkozó kondíciószám:')
c_1_A = cond(A,1)
c_1_A = norm(A,1)*norm(inv(A),1)        % így is lehetne
%%
display(' *** végtelen normára vonatkozó kondíciószám:')
c_inf_A = cond(A,inf)
c_inf_A = norm(A,inf)*norm(inv(A),inf) % így is lehetne

folyt = input('Folytatás az ENTERREL');
disp(' Szinguláris A mátrix esetén')
A = [3 4; 3 4]
%%
display(' *** 2-es normára vonatkozó kondíciószám:')
c_2_A = cond(A,2)             % itt "majdnem végtelent" kapunk
%%
display(' *** 1-es normára vonatkozó kondíciószám:')
c_1_A = cond(A,1)             % itt a definíciónak megfelelõen végtelent kapunk
%%
display(' *** végtelen normára vonatkozó kondíciószám:')
c_inf_A = cond(A,inf)         % itt a definíciónak megfelelõen végtelent kapunk