function testsumacewbar
vektor = rand(1,10000000);
tic
prvni = sum(vektor);
toc
disp('Pomoci sum: ');
disp(prvni);
tic
druhy = 0;
h = waitbar(0,'Pocitam jako drak...'); % zobrazi cekaci prouzek s titulkem
for cykl=1:length(vektor)
    druhy = druhy + vektor(cykl);
    if(rem(cykl,10000) ~= 0)    % zbytek po deleni
        continue; % jen každý 10000cí obrat provede výpis, jindy jen continue...
    end;
    waitbar(cykl/length(vektor));
end;
close(h);
toc
disp('Pomoci cyklu for: ');
disp(druhy);
