5.1.
a | A | 0,1 | Real | .1 | ||
b | B | 0,3 | Real | .3 | ||
ω | W | 251,2 | / | Real | 251.2 | |
μ | AM | 0,3 | - | Real | .3 | |
γ | GAMMA | 7,65*104 | /3 | Real | 7.65E04 | |
E | E | 2*1011 | Real | 2.E11 | ||
g | G | 9,81 | /2 | Real | 9.81 | |
Δ r | DR | 0,01 | Real | .01 | ||
N | AN | - | Real | - | ||
r | R | Real | - | |||
r | RR(I) | Real | - | |||
σr | SIR | Real | - | |||
στ | SITAU | Real | - | |||
U | U | Real | - |
- . 5.1.
IF
PROGRAM LAB51
DIMENSION RR(12)
data A,B,AM,W,GAMMA,E,G,DR /.1,.3,.3,
*251.2,7.65E4,2.E11,9.81,.01/
data RR /.112,.118,.205,.207,.223,.231,.235, 0.246,
*.268,.273,.289,.294/
C R=R+DR
write(*,*) ___________Input data_____________
WRITE(*,*) a=, a, B=,B
WRITE(*,*) AM=, AM, W=,W
WRITE(*,*) GaMMA=, GaMMA, E=,E
WRITE(*,*) G=, G, DR=,DR
AN=(1.-(AM**2))*GAMMA*(W**2)/(G*E)
R=A
write(*,*) ___________output data_____________
100 SITAU=(3.+AM)/(8.*(1.-(AM**2)))*E*AN*((A**2)+(B**2)-
*(1+(3.*AM))*(R**2)/(3.+AM)+(A**2)*(B**2)/(R**2))
SIR=(3.+AM)/(8.*(1.-(AM**2)))*E*AN*((A**2)+(B**2)-
*(R**2)-((A*B)**2)/(R**2))
S1=(3.+AM)*((A**2)+(B**2))/(1.+AM)
S2=(3.+AM)*(A**2)*(B**2)/(1.-AM)
U=(AN*R/8.)*(S1+S2)
write(*,*) R=,R,M, SIR=, SIR,PA
write(*,*) SITAU=,SITAU,PA, U=,U,M
R=R+DR
if(R-.3)100,100,200
200 WRITE(*,*) ___________________________________
C RR(I)
write(*,*) ___________output data_____________
I=1
C
10 CONTINUE
SITAU=(3.+AM)/(8.*(1.-(AM**2)))*E*AN*((A**2)+(B**2)-
*(1+(3.*AM))*(RR(I)**2)/(3.+AM)+(A**2)*(B**2)/(RR(I)**2))
SIR=(3.+AM)/(8.*(1.-(AM**2)))*E*AN*((A**2)+(B**2)-
*(RR(I)**2)-((A*B)**2)/(RR(I)**2))
S1=(3.+AM)*((A**2)+(B**2))/(1.+AM)
S2=(3.+AM)*(A**2)*(B**2)/(1.-AM)
U=(AN* RR(I)/8.)*(S1+S2)
write(*,*) I=, I, RR(I)=,RR(I),m, SIR=, SIR,Pa
write(*,*) SITAU=,SITAU,PA, U=,U,M
I=I+1
IF(I.LE.12) GOTO 10
WRITE(*,*) ___________________________________
stop
end
___________INPUT DATA_____________
A= 0.100000 B= 0.300000
AM= 0.300000 W= 251.200
GAMMA= 76500.0 E= 2.000000E+11
G= 9.81000 DR= 1.000000E-02
___________OUTPUT DATA_____________
R= 0.100000 M SIR= 0.725917 PA
SITAU= 3.739774E+07PA U= 7.223085E-06M
R= 0.110000 M SIR= 2.744271E+06PA
SITAU= 3.398178E+07PA U= 7.945393E-06M
R= 0.300000 M SIR= 0.725917 PA
SITAU= 1.180981E+07PA U= 2.166925E-05M
|
|
___________________________________
___________OUTPUT DATA_____________
I= 1 RR(I)= 0.112000 M SIR= 3.188540E+06PA
SITAU= 3.339550E+07PA U= 8.089854E-06M
I= 2 RR(I)= 0.118000 M SIR= 4.351795E+06PA
SITAU= 3.179086E+07PA U= 8.523239E-06M
I= 3 RR(I)= 0.205000 M SIR= 7.420824E+06PA
.
I= 12 RR(I)= 0.294000 M SIR= 639731. PA
SITAU= 1.231002E+07PA U= 2.123587E-05M
___________________________________
. 5.1
2 DO . α . ³ . 1=1273 , 2 : 353, 423, 473, 523, 573, 673, 773, 873, 1073 ; 0=5,67 /(24), ε 1=0,3; ε 2=0,8. :
5.2.
T 1 | T1 | Real | 1273. | ||
T 2 | T2(I) | 3531073 | Real | 353. 1073. | |
N | N | - | Real | 9. | |
F 1 /F 2 | F12 | - | Real | 5. | |
C 0 | C0 | 5,67 | /(24) | Real | 5.67 |
ε 1 | E1 | 0,3 | - | Real | .3 |
ε 2 | E2 | 0,8 | - | Real | .8 |
q | Q | /2 | Real | - | |
α | ALFA | /(2) | Real | - |
DO.
PROGRAM LAB52
dimension T2(9)
data T1,N,F12,E1,E2,C0 /1273.,9.,5.,.3,.8,5.67/,
*T2 /353.,423.,473.,523.,573.,673.,773.,873.,1073./
write(*,*) ___________Input data_____________
write(*,*) T1=,T1, N=,N
write(*,*) F12=,F12, E1=,E1
write(*,*) E2=,E2, C0=,C0
write(*,*) T2=,T2
write(*,*) ___________output data_____________
S=(1./E1)+(F12*((1./E2)-1.))
DO 50 I=1,N
Q=C0*((T1/100.)**4.-(T2(I)/100.)**4.)/S
ALFA=Q/(T1-T2(I))
write(*,*)I, T2(I)=,T2(I),C, Q=,Q,VT/M2 ALFA=,ALFA,
*VT/(M2∙K)
50 CONTINUE
WRITE(*,*) ___________________________________
stop
end
___________INPUT DATA_____________
T1= 1273.00 N= 9
F12= 5.00000 E1= 0.300000
E2= 0.800000 C0= 5.67000
T2= 353.000 423.000 473.000 523.000 573.000 673.000
773.000 873.000 1073.00
___________OUTPUT DATA_____________
I= 1 T2(I)= 353.000 C Q= 32295.3 VT/M2ALFA= 35.1036 VT/(M2K)
I= 2 T2(I)= 423.000 C Q= 32091.4 VT/M2ALFA= 37.7545 VT/(M2K)
I= 3 T2(I)= 473.000 C Q= 31868.2 VT/M2ALFA= 39.8352 VT/(M2K)
I= 4 T2(I)= 523.000 C Q= 31561.8 VT/M2ALFA= 42.0825 VT/(M2K)
I= 5 T2(I)= 573.000 C Q= 31153.8 VT/M2ALFA= 44.5055 VT/(M2K)
I= 6 T2(I)= 673.000 C Q= 29949.6 VT/M2ALFA= 49.9160 VT/(M2K)
I= 7 T2(I)= 773.000 C Q= 28070.5 VT/M2ALFA= 56.1410 VT/(M2K)
I= 8 T2(I)= 873.000 C Q= 25301.9 VT/M2ALFA= 63.2547 VT/(M2K)
I= 9 T2(I)= 1073.00 C Q= 16089.1 VT/M2ALFA= 80.4453 VT/(M2K)
___________________________________
|
|
. 5.2. - DO
1. l =1,8 V =78 /c α δ: ) x 0,01 1,7 0,01 ; ) x, : 0,03; 0,06; 0,09; 0,12; 0,15; 0,2; 0,25; 0,3; 0,4; 0,5; 0,6; 0,7; 1,0. Գ : , . :
; ; ; .
2. σr σT u r 1=0,12 , r2 =0,28 䳺 p 1=180 p 2=12 . : , . :
; ;
= .
σT, σr, u, R ΔR=
σT, σr, u, R = 0,133; 0,1387; 0,1432% 0,177; 0,181; 0,203; 0,234.
3. , δ =0,35 . t 1=1000 0C, t 2=60 0C. . * , : ) =0; 0,05; 0,1; 0,13; 0,15; 0,18; 0,2; 0,3 ; ) 0,1 0,35 0,002 .:
; ; ;
; ; .
4. a =0,36 k =0,03 䳺 p =0,28 . W, (E =2,1∙105 , μ =0,31) , : r=0; 0,008; 0,01; 0.012; 0,018; 0,022; 0,028 . :
; ;
; .
5. , P 0=5 , P =14,8 . . V P 0,5 , P =1,1; 1,3; 1,8; 2,1; 2,73; 3,8; 4,6 . :
.
6. ϳ . . , .
, . : ; ; .
, 0,02 .
7. . , . . . . :
; ; ; .
8. . . , . , x =0,5... l 10 . :
; ; ; .
9. () () . , . . . t1, t 2 ,t3 : . , . : ; ;
; ; .
10. =0,28 /. =62 0. =2,2 . =12 0C, =30 0. , =0,003; 0,006; 0,009; 0,01; 0,012; 0,015; 0,018; 0,021; 0,025; 0,03 , Q , 0,005 0,03 0,0025 . Գ : =1,16. 10-6 2/; p= 4,17.10-3 /(∙); =0,63 /(∙); =998,6 /3; =1156.10-6 .; = 550,1.10-6 .. : ;
;
.
11. , ᒺ P 1=2,56 /2 P 2=17 /2. 1 = 8 0C; = 0,72. : =1,3; =489,2 /(∙); = 0,761 /3. () ᒺ , 100 500 3/ 10 3/, (/) =112; 136; 152;164; 183; 194; 202; 302; 430; 470; 493 3/. :
|
|
12. = 0,11 , =0,2 . =1400 0, .=28 0, =48 /(2∙). :
) , : =5 /(∙); =(0,020,5) /(∙) 0,2 /(∙);
) , =(20; 18; 10; 7; 5; 3; 1,6; 1,1; 0,6) /(∙).
- . ). :
.
13. 䳿 NaNO3. ( ), =1,3 2 1=93 0C 2=41 0C, 1=16,2 NaNO3 =1000 , =4% . 41 0 2=12,6 =1000 . NaNO3 = 8,52 /; =2,11.105 /; =2472 /(∙); =2,345.105 /; =1. =(4200; 4500; 4720; 5000; 5300; 5600; 5900; 6000; 6500; 7000)/. : ; ;
; .
=(4.1037.103) / 100 /.
14. . =48 2/3; =0,55 3/3. , (0,06; 0,1; 0,12; 0,14; 0,17; 0,19; 0,21; 0,24; 0,25) /. : ρ =1,12 /3; μ =0,172 ∙; D =11,47∙10-6 2/. :
; ; ; ; .
W=0,2 /, G 40 66,5 2/3, 0,1 2/3.
15. () , =320 , ρ 0=1,3 /3, p 0=1,04 /2, ρ p=420 /3, p =1,3 /2, =235 . 0=1200; 1300; 1420,8; 1600; 1700; 1820; 1940; 2000; 2150,8; 2300; 2500; 3000; 3400; 3620; 3800 3/ . 3/ 0,1 3/ 0=2500 /. :
; ; ; ; ; ; .
16. : ; ; ; (), (), () 䳿 - . 0,028/3, ., , /3. , . :
|
|
) =1020; 1100,8; 1200; 1320; 1500; 1600; 1720; 1800; 2000; 3000; 3500; 3700; 4000 3/. - =0,28/.
) =2500 3/; =0,11,1 / 0,05 /.
17. =3,3 /(*). . , . , . : ; ; .
, 0,01 .
18. a =0,33 k =0,02 䳺 p =0,15 . I, (E =2,1∙105 , μ =0,31) , : r= 0,001; 0,006; 0,011; 0,018; 0,024; 0,028 . :
; ;
; .
19. σr σT Y :
; ;
.
: r 1=0,21 , r2 =0,44 . p 1=162 , p 2=32 . : , .
σT, σr, u, R ΔR= 0,01 .
σT, σr, u, R = 0,211; 0,217; 0,388; 0,411; 0,415; 0,418; 0,433.
20. =0,2 , =0,32 . =0,3; =210 ; =2. :
, .
:
1) =123 , =123,3 0,01 .
2) =123; 122,1; 116; 111; 100; 89; 80; 77; 65; 53; 45; 41; 34; 28 ; =28 .
21. , V =63 /c α δ: ) x 0,04 1,2 0,01 ; ) x, : 0,045; 0,06; 0,09; 0,12; 0,15; 0,2; 0,25; 0,3; 0,4; 0,5; 0,6; 0,7; 1,0. Գ : , . :
; ; ; .
22. σr σT u r 1=0,16 , r2 =0,29 䳺 p 1=150 p 2=14 . : , . :
; ;
= .
σT, σr, u, R ΔR=
σT, σr, u, R = 0,134; 0,137; 0,142; 0,167; 0,184; 0,201; 0,283.
23. , δ =0,28 . t 1=1050 0C, t 2=70 0C. . , * : ) =0; 0,05; 0,1; 0,13; 0,15; 0,18; 0,2; 0,23 ; ) 0,1 0,27 0,01 .:
; ; ;
; ; .
24. D =0,3 k =0,02 䳺 p =0,28 . S, (E =2,1∙105 , μ =0,31) a, : r=0; 0,007; 0,011; 0.013; 0,019; 0,027; 0,029 . :
a= D/2;
; ;
; .
25. , P 0=5 , P =13,8 . . V P 0,2 , P =1,1; 1,35; 1,66; 2,15; 2,73; 3,7 . :
.
26. 2 . . , .
, . : ; ; .
, 0,02 .
27. . : . . , . . . . :
; ; ; .
28. , , . : ; . , x =0,3... l 5 . :
; ; ; .
29. . , , . , . . . t1, t 2 ,t3 : . , . : ; ;
|
|
; ; .
30. =0,18 /. =58 0. =1,6 . =9 0C, =33 0. , =0,002; 0,003; 0,006; 0,01; 0,011; 0,015; 0,012; 0,021; 0,025; 0,03 , Q , 0,005 0,025 0,0005 . Գ : =1,17. 10-6 2/; p= 4,12.10-3 /(∙); =0,73 /(∙); =998,65 /3; =1150.10-6 .; = 550,6.10-6 .. : ;
;
.
31. , ᒺ P 1=3 /2 P 2=22 /2. 1 = 5 0C; = 0,7. : =1,23; =489,5 /(∙); = 0,76 /3. (), , ᒺ , 40 400 3/ 10 3/, (/) =12; 13; 15,2;16,4; 18,3; 94; 20; 30; 43; 140; 288; 300 3/. :
32. = 0,07 , =0,2 . =115 0, .=6 0, =50 /(2∙). :
) , : =12 /(∙); =(0,059) /(∙) 0,05 /(∙);
) , =(21; 18; 19; 17; 5; 3; 1,6; 1,1; 0,6) /(∙).
. ). :
.
33. NO3 ( ), =1,5 2 1=88 0C 2=39 0C, 1=14,9 NO3 =965 , =5% . 39 0 2=12,8 =965 . NO3 = 8,5 /; =2,16.105 /; =2470 /(∙); =2,343.105 /; =1. 4100; 4220; 4720; 5000; 5300; 5600; 5900; 6000; 6500; 6980 /. :
; ;
; .
=(4.1037.103) / 100 /.
34. . =61 2/3; =0,58 3/3. , U : 0,04; 0,1; 0,13; 0,14; 0,17; 0,177; 0,21; 0,234; 0,25) /. : ρ =1,11 /3; μ =0,17 ∙; D =11,6∙10-6 2/. :