function Q=err_t(t,net,x,z)
% funkcja zwraca blad sieci przy zalozonej dlugosci korku t
t_net=update_net(net,t); 
% net_t jest kopia sieci 'na probe' poprawiona o krok t 
Q=0;
for n=1:length(x) % po kolei podajemy elementy ciagu uczacego
    
    t_net=sim_net(t_net,x(n)); % przepuszcamy biezacy element przez siec
    
    % najpierw akumulujemy zmiany wag w elementach warstwy wyjsciowej
    for i=1:t_net.N_out
        t_net.out(i)=dw_elem_out(t_net.out(i),t_net,z(n));
        Q=Q+(t_net.out(i).delta).^2;
    end
    
    % nastepnie akumulujemy zmiany wag w elementach warsty ukrytej
    for i=1:t_net.N_hid
        t_net.hid(i)=dw_elem_hid(t_net.hid(i),t_net);
    end
end