> | restart; |
Дано
> | x5:=9:y5:=4:w:=6:epsilon:=-2: |
> | x1:=0:y1:=0: |
> | xd:=9+3*cos(w*t+Pi+epsilon*t^2/2): yd:=4+3*sin(w*t+Pi+epsilon*t^2/2): |
> | eq1:=(xd-xc)^2+(yd-yc)^2=36: |
> | eq2:=(x1-xc)^2+(y1-yc)^2=16: |
> | eq3:=simplify(eq2-eq1): |
> | xc:=solve(eq3,xc): |
> | eq1: |
> | R:=solve(eq1,yc):#assign(R): |
> | yc:=R[1]: |
> | simplify(subs(t=0,yc)); |
4
> | k:=(yd-yc)/(xd-xc): |
> | yb:=yc+k*(xb-xc): |
> | eq3:=xb^2+yb^2=25: |
> | R2:=solve(eq3,xb): |
> | xb:=R2[2]: |
> | simplify(subs(t=0,R2[2])); |
3
> | S:=sqrt((xb-xc)^2+(yb-yc)^2): |
> | v:=simplify(subs(t=0,diff(S,t))); |
v := 12
> | a:=simplify(subs(t=0,diff(S,t$2))); |
a := -118
> | simplify(subs(t=0,[xc,xb,xd,yc,yb,yd])); |
[0, 3, 6, 4, 4, 4]