function obrazek = binaryzacja(A, prog)
  [x, y] = size(A);
  for (ii = 1 : x)
    for (jj = 1 : y)
      if (A(ii, jj) > prog)             % Przyporządkowanie wartości 0 lub 255
        obrazek(ii, jj) = 255;          % w zależności od progu
      else
        obrazek(ii, jj) = 0;
      endif
    endfor
  endfor
endfunction