5-modul. Ashıq anǵarlarda suyıqlıq aǵımınıń tegis háreketi 16-lekciya. Ashıq anǵarlarda suyıqlıq aǵımınıń tegis háreketi Joba

19.3-súwret
V. Aǵımnıń normal tereńligi hám ortasha tezligin EEM járdeminde esaplaw dástúri

5. DIM H0(15), H1(15)
10 PRINT “Suyıqlıq aǵımınıń tegis háreketiniń H0 normal tereńligi hám onıń U ortasha tezligin EEM de esaplaw”
20 PRINT “Berilgen muǵdarlardı kirgiziń”
30 READ Q, I, M, N, E, B1, G, DELTA
40 PRINT “Ashıq ańǵardaǵı suyıqlıq aǵımınıń qálegen tereńligin kirgiziń”
50 INPUT H
60 B=B1*H:W=(B1+M)*H^2
70 X=(B1+2)*H*SOR(1+M^2):R=W/X
80 IF R<5 THEN 140
90 Y1=LOG(10)/LOG(R)
100 Y2=5*(N*SOR(G)/.26)*(1-LOG(R)/LOG(10)
110 Y3=.25*(1/N-(SOR(G)/.13)*(1-LOG(R)/LOG(10))
+(SOR(G)/.13)*(SOR(G)*LOG(R)/LOG(10)
120 Y=Y1*LOG(Y2+N*Y3)/(LOG(10)
130 GOTO 150
140 Y=2.5*SOR(N)-.3-.75*SOR(R)*(SOR(N)-.1)
150 C1=(1/N)*R^Y
190 C2=.5*(1/N-SOR(G).13*(1-LOG(R)/LOG(10))+Y3
190 L=2*G*H+1/V^2
190 C3=(4.92*LOG(H/DELTA)/LOG(10)+2.94)*SOR(G)
200 V1=.000101
190 C4=20*LOG(R/(N+.385*V1)/SOR(G*R*1))/LOG(10)
220 PRINT “Pavlovskiy formulası:s=”; C1
230 PRINT “Jeleznyakov formulası:s=”; C2
240 PRINT “Umarov formulası:s=”; C3
250 PRINT “Altshul formulası:s=”; C4
270 Q1=W*C1+SOR(R*1)
275 FOR I=1 TO 10
280 HI(I)=.1+I*.2
290 HO(I)=(((Q1*N)/SOR(I))((B/HI(I)+2*SOR(1+M^2))
/(B/HI(I)+M)^(Y+.5)*(1/(B/HI(I)+M))^(1/(2.5+Y))
292 PRINT “HO(I”)=”; HO(I)
300 IF ABS(HO(I)-H)>E THEN 50
305 PRINT “q”; Q; “q1=”; Q1; “”; U; “w=”; W; “HO=”; HO
310 NEXT I
320 PRINT “q”; Q; “q1=”; Q1; “”; U; “w=”; W; “HO=”; HO
400 END
Dástúr mashinaǵa kirgiziledi hám mashina iske túsiriledi, nátiyjede aǵımnıń qarar tapqan tegis ilgerileme háreketiniń normal tereńligi hám ortasha tezligin hámde oǵan tiyisli barlıq gidravlikalıq elementleriniń mánislerin alamız.
EEM járdeminde esaplawdan aldın meseleni qolda sheship, onı mashinadan alınǵan nátiyjeler menen salıstırıp kóriw kerek, sebebi, usı usıl menen esaplaw dástúriniń durıs dúzilgenligin tastıyıqlaw múmkin.
Tayanısh sózler: kanal túbiniń salıstırma eni, SHezi-Manning formulası, SHezi-Manning parametri, gidravlikalıq eń qolay kesim, gidravlikalıq eń qolay kesim elementleri, gidravlikalıq eń qolay kesimniń maydanı, gidravlikalıq eń qolay kesimniń ortasha tezligi, gidravlikalıq eń qolay kesimniń gidravlikalıq radiusı, S.A.Girshkan formulası, kanaldıń gidravlikalıq bekkem eni, kanaldıń gidravlikalıq bekkem tereńligi, kanaldı ılay baspaw tezligi, kanaldı juwmaw tezligi, juwılmaytuǵın magistral kanaldı joybarlawdıń QMQ usılı, juwılmaytuǵın magistral kanaldı joybarlawdıń A.A.CHerkasov usılı, ılay bóleksheleriniń gidravlikalıq iriligi, ılay bóleksheleriniń ortasha diametri, tegis hárekettiń normal tereńligi hám ortasha tezligin EEM de esaplaw, tegis hárekettiń tiykarǵı teńlemesi, algoritm, blok-sxema, esaplaw dástúri.