0;
% Legyen A egy tetsz®leges mátrix. Az A mátrix minden
% páros index¶ oszlopában minden nemnegatív elemét
% cserélje le 1-re. Jelölje B az így kapott mátrixot!
% Összegezzük a B mátrix elemeit soronként! Jelölje v az
% így kapott oszlopvektort! Írjon olyan Octave függvényt,
% mely inputja A, outputja a v vektor 3-normája!
% A feladat megoldásához ne használja a beépített norm függvényt!
function n = normas_feladat(A)
  B = A;
  [n m] = size(B);
  for i = 1:n
    for j = 2:2:m
      if B(i,j) >= 0
        B(i,j) = 1;
      endif
    endfor
  endfor
  v = sum(B')' % sum alapból oszloponként összegez
  % transzponáltas trükk
  n = nthroot(sum(abs(v).^3),3);
endfunction