Физика сабаќтарында компьютерді пайдалану


P= 6*10^6 н/ м² N=H/hmax Hmax= 6*10^6/2*10^4*6



бет14/59
Дата04.11.2022
өлшемі2,49 Mb.
#47406
1   ...   10   11   12   13   14   15   16   17   ...   59
Байланысты:
¨À?Ò?áå îáëûñòû? êàäðëàð á³ë³êò³ë³ã³í àðòòûðó æ?íå ?àéòà äàÿðëàó

P= 6*10^6 н/ м² N=H/hmax Hmax= 6*10^6/2*10^4*6

N=6 Hmax=H/N hmax=50

Bs = 2*10^4 н/ м² Ps=P/S

Hmax-? P= Bs*V=H*S* Bs


P=H* Bs*S/S= H* Bs

H= P/ Bs, Hmax=

=P/(N* Bs)


Жауабы : 50м
Program Berxktxk;
Var P,N,Sb,Hmax:real;
Begin
P:=6E+6;Sb:=2E+4;N:=6;
Hmax:=P/(Sb*N);
Writeln(Hmax: 3:1);
End. Нәтижесі :50


Ауырлық күш . Дененің салмағы . Салмақсыздық . Дененің еркін түсуі

Денені жердің тарту күші мен ауаның кедергісінің әсерінен жыл -дамдық квадратына пропорционал болатын уақытқа, жүріп өткен жолына, жылдамдығы мен үдеуіне тәуелділігін көрсететін кестенің программасын құрыңдар. Дененің бастапқы жылдамдығы 0-ге тең деп алу керек.


Дененің еркін құлау процесінің математикалық моделін құрай - ық. Мектеп курсынан Fа=Fкед.+Fтар (1) екендігі белгілі. Біздің жағ -


дайымызда Fа =P - ауырлық күші , Fкед -ауаның кедергісі

Fa =M*g (2) , Fked=-L*V² (3)


F деп ( Ньютоның 2 –ші заңы бойынша ) дененің a үдеуі -мен денеге әсер ететін күшті белгілейміз, сонда F=a* m (4) болады


(1) –(4) формулалардан негізгі формуланы аламыз:

a=g- (L/m)*V² (5)


L/m -ді k арқылы белгілесек, оны мына түрде пайдалана аламыз:


a=g-k*V*V (6)


К біз білетін мектеп курсындағыдай тұрақты бола алмайды, алайда аз уақыт аралығында (t-дан t+dt дейін өзгергенде ) V(t+dt)= V(t)+a(t)*dt (7) теңдігін шамамен пайдалануға болады.


Ал t және t+dt аралығындағы орташа жылдамдық Vор=(V(t)+V(t+dt))/2 (8).Сол аралықта жүрілген жол DS=Vор *Dt (9) болады.

S(t) және S(t+td) арқылы қозғалыс басынан бастап t уақытына на, t уақыты-нан t+dt дейінгі сәйкес аралықтарды белгілеп S(t+td)= S(t)+Ds (10). Процесті модельдеу үшін аралықтарды көптеген уақыт аралықтарға бөліп, сол аралықтарда (6)-(10) формулаларды пайда -ланамыз.


Бастапқы уақыт мезетінде (t=0) және жүріп өткен жол S,V=0. Сондықтан (6) формулаға сәйкес a(0)=g-k*0*0=g. Енді (7) формула- ны пайдаланып V(dt)=0+g+dt, осыдан
Vор = (0+g*dt)/2 және Ds= ((g*dt)/2)*dt
және S(dt)=S(0)+dS=((g*dt)/2)*dt.

Сөйтіп, уақыттың t=0 мезетінде t=dt дейінгі қарастырып отыр- ған процестің барлық сипаттамаларын аламыз. Уақыттың dt мезе- тінде үдеуді тағы есептейміз : a(dt) =g-k*(g*dt)*(g*dt) біле отырып,


V(Dt+dt)=V(dt)+a(dt)*dt


V(dt) мен a(dt) біле отырып, Vор , Ds және S(dt+dt) жаңа мәндерін есеп тейміз .Солайша 2*dt уақыт мезеті үшін де үдеуді, жылдамдық- ты, жүрілген жолды табамыз .t=3*dt ,t=4*dt уақыт мезеті үшін де табамыз т.с.с.


2. Жер бетіне орналастырылған брандспойттан металдан жасалған ұшы бар шланг 10 м/с су ағыны атқылайды. Брандспойттан жай вер- тикаль ось бойынша айналады, сол мезгілде оның горизонтқа көл- беу бұрышы өзгеріп отырады. Брандспойттың ең үлкен құя алатын ауданын анықтайтын программа құрыңдар. Ауаның кедергісі еске -


рілмесін. G=9.81 деп алуға болады.

Горизонтқа бұрыш жасайлақтырылған дененің қозғалысы жердің тарту күшінің әсерінен x=v*t*cosα, y=v*t*sinα теңдеулері бойынша сипатталатындығы белгілі. Ұшу алыстығы x=v^2*sin2*α/g формуласымен ан ықталатындығын ескеріп, онда ең үлкен ұшу алыстығы sin2α=1, яғни α=45 тең болғанда ғана болады. Сөйтіп, көлбеу бұрышы 0-ден 45 градусқа дейін өзгереді деп, ең үлкен ұшу алыстығы, яғни ең үлкен қию радиусы N=1, R=V^2*SIN(2*α)/G құю дөңгелегінің ауданы:


S=3.14*R^2=3.14 (V^2*(SIN(2*α)/G)^2; S= 3.14*V^4*(SIN(2*α)/G)^2

V0- Дененің бастапқы жылдамды, N - радиандық бөлгіші,


R-ең үлкен дөңгелектің радиусыI, S- дөңгелектің ең үлкен ауданы.

Program Brandpoit;


Const Pi=3.14;G=9.81;
Var N:Integer;
V0,A,R,S:real;
Begin
Write('N-dx engxz');readln(N); Write('V0-dx engxz');Readln(V0);
A:=Pi/(4*N);R:=Sqr(V0)*Sin(2*a)/G;
S:=Pi*sqr(V0)*sqr(V0)*Sqr((sin(2*a)/G));
Writeln(R:3:1,'':2,S:4:1);
End.

Program RmenS;


Const Pi=3.14;G=9.81;
Var N:Integer;
V0,R,S:real;
Begin
Write('N-dx engxz');Readln(N);
Writeln('V0-dx engxz');Readln(V0);
For N:=1 TO N do
Begin
S:=Pi*sqr(V0)*sqr(V0)*sin(Pi/2/n)/sqr(g);
R:=sqr(V0)*sin((Pi/2)/N)/G;
Writeln(S:3:1,'':4,R:3:1);
End;
End.


Достарыңызбен бөлісу:
1   ...   10   11   12   13   14   15   16   17   ...   59




©emirsaba.org 2024
әкімшілігінің қараңыз

    Басты бет