function BER=konacno15_11(N,p)
% N - mora da bude deljivo sa 11 !!!
y=0; xr=0;

x=randi([0,1],1,N);

for i=1:N/11
    I=x(11*i-10:11*i);
    C=koder15_11(I);
    y(15*i-14:15*i)=C;
end

e=verovatnocagreske(N/11*15,p);
yr=rem(y+e,2);

for i=1:N/11
    R=yr(15*i-14:15*i);
    Ir=dekoder15_11(R);
    xr(11*i-10:11*i)=Ir;
end
BER=sum(rem(x+xr,2))/N;