Strona0297

297

>C[12] :«k[3]*l[3]_;

^12 ^:—&3 h

> C[21] :=k[3]*1[3];

C_2l k₃ /₃

>ds«(l[l]+l[23)/2j

h

>Io:=(m[2]*(l[l]+l[2])^A2)/12;

fo:=im₂(/₁₊/₂)²

> a[22]:=Jo;

«22 (h+hf

>C[22]:-k[l]*l[l]^A2+k[2]*I[2]^A2+k[3] *1[3]^A2,*

C₂₂^ /_t + k₂l₂ + k₃/₃

> row4;

1 m₂(/i+/₂)²(^(0²-^₃)ft)² _t    +k₂l₂+Ljl) _| ^ _{/ =0}

12    *3/3    *3/3    ³³

> row5:-subs(dane,row4);

OA

roW5 ■.= -—(.5 <o² - 22) o² +142.2727273<o² - 5600 = 0 33

>wynik:sssolve(row5,omega) ;

wym* ?= -6.099830656,6.099830656, -11.14302769,11.14302769 >omega[1]:=abs(wynik[2]);

co, := 6.099830656

>omega[2]:-abs(wynik[4])s

co₂ := 11.14302769

>mu[l]:=subs(dane,(a[11]*omega[1]^A2-C[11])/C[12]);

_:--.00514550451_

>mu[2]:=subs(dane,(a[11]*omega[2]^A2-C[ll])/C[12]);

H₂:= .06073262582

>    row_zl:=A[l] * sin (omega [1] *t-t-gaimaa [1] ) ;

row_z\ \= A₁ sin(6.099830656 / +

>    row__płiil: =mu [1] *A[1] * sin (omega [1] *t+gamma[X] ) ;

row_phii := -.00514550451Ą sin(6.099830656 / + y_{)