Вертикаль жоғары лақтырылған дененің қозғалысы
Ho биіктіктен Vo жылдамдықпен дене жоғары вертикаль лақтырыл- ған. Берілген уақыт мезетінде дененің жылдамдығы мен координа- тасын анықтаңдар
Есепті шешу үшін математикалық моделін құру керек .
v=v0-g*t
Y=H0+v0*t -
Программада For ... To қайталану операторын пайдаланайық
Y=H0
Program VerlTxkL;
Var t:integer;
h0,v0,vt,sY:real;
begin
Write(h0,v0);Readln(h0,v0);
for t:=1 to 5 Do
begin V0
vt:=v0-9.8*t; sY:=h0+v0*t-4.9*sqr(t);
Writeln(vt:4:1,' ',sY:4:1); X
end;
readln;
end.
H0=100,V0=50 ,T=5 беріп программаны жүргізсек :
40.2 145.1
30.4 180.4
20.6 205.6
10.8 221.6
1.0 227.5
Көкжиекке бұрыш жасай лақтырылған дененің қозғалысы
Горизонтқа бұрыш жасай лақтырылған дененің қозғалысы
Program VmAbailan;
const g=9.85;
var v0:integer;
a,a0,t,s:real;
Begin
Write('a0-nw engxz');Readln(a0);
For v0:=40 To 60 Do
begin
a:=(a0*3.14)/180;
t:=v0*sin(a)/g;
S:=v0*cos(a)*2*t;
Writeln(T:3:3,' ',S:3:2,' ',a0:3:1);
end;
Readln;
end.
Дене горизонтқа А ( град. есебімен) бұрыш жасайлақтырылған H=100, V0=10, A=30,T=5 беріп, программаны жүргізсек, онда дененің жылдам- дығы мен координаттарының уақыт бойынша кестесін аламыз.
Дене x өсімен бірқалыпты, ал y өсімен бір қалыпты үдемелі қозғалады.
Vx=V0*COS(3.14*a/180)
Vy=V0*SIN(3.14*a/180)-9.8*t
X=V0*COS(3.14*a/180)*t
Y=H0+V0*SIN(3.14*a/180)*t-4.9*t2
Program VerTxkLF;
Var n, t:integer;
h0,v0,a,VY,VX,V,X,Y:real;
begin
Write('n,h0,v0,a');Readln(n,h0,v0,a);
for t:=1 to n Do
begin
VY:=(v0*sin(3.14*a/180)-9.8*t);
VX:=(v0*cos(3.14*a/180));
V:=sqrt(sqr(v0*sin(3.14*a/180)-9.8*t)+sqr(v0*cos(3.14*a/180)));
X:=(v0*cos(3.14*a/180)*t);
Y:=(h0+v0*sin(3.14*a/180)*t-4.9*sqr(t));
Writeln(VY:2:1,' ',VX:2:2,' ',V:2:2,' ',X:2:2,' ',Y:2:2);
end;
readln;
end.
Программаны жүргізіп
N h0 v0 a
5 100 10 30 берсек нәтиже
-4.8 8.66 9.90 8.66 100.10
-14.6 8.66 16.98 17.32 90.40
-24.4 8.66 25.89 25.98 70.89
-34.2 8.66 35.28 34.65 41.59
-44.0 8.66 44.65 43.31 2.29
Достарыңызбен бөлісу: |