diff options
Diffstat (limited to '1709/CH2')
-rwxr-xr-x | 1709/CH2/EX2.1/2_1.sce | 11 | ||||
-rwxr-xr-x | 1709/CH2/EX2.2/2_2.sce | 12 | ||||
-rwxr-xr-x | 1709/CH2/EX2.3/2_3.sce | 9 | ||||
-rwxr-xr-x | 1709/CH2/EX2.4/2_4.sce | 20 | ||||
-rwxr-xr-x | 1709/CH2/EX2.5/2_5.sce | 21 |
5 files changed, 73 insertions, 0 deletions
diff --git a/1709/CH2/EX2.1/2_1.sce b/1709/CH2/EX2.1/2_1.sce new file mode 100755 index 000000000..462e82096 --- /dev/null +++ b/1709/CH2/EX2.1/2_1.sce @@ -0,0 +1,11 @@ +clc
+//Initialization of variables
+P1=200 //psia
+P2=15 //psia
+V1=1 //ft^3
+g=1.3
+//calculations
+V2=V1*(P1/P2)^(1/g)
+W=-(144*(P2*V2 - P1*V1)/(g-1))
+//results
+printf("Work done = %.2e ft. lbf",W)
diff --git a/1709/CH2/EX2.2/2_2.sce b/1709/CH2/EX2.2/2_2.sce new file mode 100755 index 000000000..134895bce --- /dev/null +++ b/1709/CH2/EX2.2/2_2.sce @@ -0,0 +1,12 @@ +clc
+//Initialization of variables
+L=0.305 //m
+v=4.58 //m/s
+i=10 //A
+B=1 //W/m^2
+//calculations
+F=i*B*L
+W=F*v
+//results
+printf("Force necessary = %.2f N",F)
+printf("\n Work per unit time = %.2f W",W)
diff --git a/1709/CH2/EX2.3/2_3.sce b/1709/CH2/EX2.3/2_3.sce new file mode 100755 index 000000000..11b9788f1 --- /dev/null +++ b/1709/CH2/EX2.3/2_3.sce @@ -0,0 +1,9 @@ +clc
+//Initialization of variables
+U=2545 //B/hr
+m=50 //lbm
+cv=1
+//calculations
+dT=U/(m*cv)
+//results
+printf("Change in temperature = %.1f F",dT)
diff --git a/1709/CH2/EX2.4/2_4.sce b/1709/CH2/EX2.4/2_4.sce new file mode 100755 index 000000000..345f57cc0 --- /dev/null +++ b/1709/CH2/EX2.4/2_4.sce @@ -0,0 +1,20 @@ +clc
+//Initialization of variables
+P1=14.7 //psia
+V1=1 //ft^3
+P2=14.7 //psia
+M=28.97
+T1=70+460 //R
+T2=500+460 //R
+cp=0.24 //B/lbm F
+//calculations
+m=P1*144*V1*M/(1545*T1)
+Qp=m*cp*(T2-T1)
+V2=V1*P1*T2/(P2*T1)
+W=P1*144*(V2-V1)
+W=-W/778
+dU=Qp+W
+//results
+printf("Work done = %.2f Btu",W)
+printf("\n Heat added = %.2f Btu",Qp)
+printf("\n Change in internal energy = %.2f Btu",dU)
diff --git a/1709/CH2/EX2.5/2_5.sce b/1709/CH2/EX2.5/2_5.sce new file mode 100755 index 000000000..89f8ede6e --- /dev/null +++ b/1709/CH2/EX2.5/2_5.sce @@ -0,0 +1,21 @@ +clc
+//Initialization of variables
+l=20
+b=25
+h=8
+Vp=2.5
+n=20
+P=14.7//psia
+T=530 //R
+t=15 //min
+Qp=375 //B/hr
+cv=0.1715 //B/lbm F
+//calculations
+Vroom=l*b*h
+Vair=Vroom-Vp*n
+m=P*Vair*144/(53.35*T)
+dU=n*Qp
+U=t*dU/60
+dT=U/(m*cv)
+//results
+printf("Air temperature rise = %d F",dT+1)
|