% Ex 13-14
%

nt=[9999 3999 1999 799 798];
snt=size(nt,2);
u20vib=zeros(1,snt);
u20sta=zeros(1,snt);

for it=1:snt
    nbIt=nt(it);
    vib=corde_vib(159,nbIt,10,nbIt);
    sta=corde_stab(159,nbIt,10,nbIt);
    u20vib(it)=vib(20);
    u20sta(it)=sta(20);
end
t='sortie';
t
u20vib 
u20sta