t:=i/N*T+4:
r1:=vector([r[1],r[2]]):
v1:=vector([v[1],v[2]]):
a1:=vector([a[1],a[2]]):
acc:=arrow(r1,a1,pv,color=red):
vel:=arrow(r1,v1,pv,color=blue):
txa:=TEXT([r[1]+a[1]*k,r[2]+a[2]],"a"):
txv:=TEXT([r[1]+v[1]*k,r[2]+v[2]],"v"):
p[i]:=display(vel,acc,txa,txv): end do:
> t:='t':
308
> g1:=display(seq(p[i],i=1..N),insequence=true):
> g2:=plot([x,y,t=0..T]):
> display(g1,g2,scaling=constrained,title="Nuktaning tezligi va tezlanishi");
> with(linalg):V:=norm(v,2):
Warning, the protected names norm and trace have been redefined and unprotected
> at:=dotprod(v,a)/V:
> a_:=norm(a,2):
> an:=norm(crossprod(v,a),2)/V:
> t:=evalf(Pi)/2;
t := 1.570796327
> ` x`=x;
x1.878679656
> ` y`=y;
y6.414213562
> ` v`=V;
v1.274754878
> ` at`=at;
at-.2451451688
> ` an`=an;
an.5883484054
> ` a`=a_;
309
a.6373774392
> ` ro`:=V^2/an;
ro := 2.761968902
Tekis parallel harakat
Koʻp zvenoli mexanizmlar texnikaning turli sohalari ( toʻqimachilik
mashinilari, mashinasozlik va boshqalar) da keng qoʻllaniladi. Nazariy mexanika
fanini oʻrganishda tekis parallel harakat qilayotgan koʻp zvenoli mexanizmlarning
harakatini animatsiyalar orqali namoish qilish shu tipdagi masalalarni tushinishda
katta ahamiyatga ega. Misol uchun
> restart:
> nam:=array(0..4,[O,A,B,D,C]):
> read "ris.m";
> OA:=2:AA:=7: a:=0.15: b:=3: BC:=10:R:=1.5:r:=0.1:
> omegaOA:=2: T:=2*pi/omegaOA:
> x[0]:=0:y[0]:=0:
> with(plots):with(plottools):
Warning, the name changecoords has been redefined
Warning, the name arrow has been redefined
Do'stlaringiz bilan baham: |