%uloha 82 - Hadamardova matice je ortogonalni

H=hadamard(4);

k=size(H,1);    %pocet radku (v tomto pripade je jich vzdy 8, pro obecnost)

for i=1:k-1     %od 1. do predposledniho
    ri=H(i,:);  %i-ty radek
    for j=i+1:k %i-ty radek s kazadym za nim
        rj=H(j,:);  %j-ty radek
        
        if ri*rj'~=0 %kontrola skalárního souèinu (pro kolmé vektory 0)
         s = sprintf('Problem s %d. a %d. radkem!',i,j);
        else
            s = sprintf('Radky %d, %d jsou kolme!',i,j);
        end
        disp(s)
    end

end