diff options
Diffstat (limited to '1472/CH5')
-rwxr-xr-x | 1472/CH5/EX5.1/5_1.sce | 11 | ||||
-rwxr-xr-x | 1472/CH5/EX5.2/5_2.sce | 12 | ||||
-rwxr-xr-x | 1472/CH5/EX5.3/5_3.sce | 14 | ||||
-rwxr-xr-x | 1472/CH5/EX5.4.a/5_4.sce | 15 | ||||
-rwxr-xr-x | 1472/CH5/EX5.4.b/5_4b.sce | 15 |
5 files changed, 67 insertions, 0 deletions
diff --git a/1472/CH5/EX5.1/5_1.sce b/1472/CH5/EX5.1/5_1.sce new file mode 100755 index 000000000..5169d42b9 --- /dev/null +++ b/1472/CH5/EX5.1/5_1.sce @@ -0,0 +1,11 @@ +clc
+//initialization of varaibles
+V1=10 //cu ft
+P1=15 //psia
+V2=5 //cu ft
+H=34.7 //Btu
+//calculations
+W=P1*(V2-V1)*144
+dE=-H-W/778
+//results
+printf("Internal energy change = %.1f Btu",dE)
diff --git a/1472/CH5/EX5.2/5_2.sce b/1472/CH5/EX5.2/5_2.sce new file mode 100755 index 000000000..f3dea1eb5 --- /dev/null +++ b/1472/CH5/EX5.2/5_2.sce @@ -0,0 +1,12 @@ +clc
+//initialization of varaibles
+dT=35 //F
+H=34 //Btu
+cv=1.2 //B/lb F
+m= 2 //lb
+//calculations
+U=cv*dT*m
+W=H-U
+//results
+printf("Work done = %d Btu",W)
+printf("\n Internal energy change = %.1f Btu",U)
diff --git a/1472/CH5/EX5.3/5_3.sce b/1472/CH5/EX5.3/5_3.sce new file mode 100755 index 000000000..42b868c69 --- /dev/null +++ b/1472/CH5/EX5.3/5_3.sce @@ -0,0 +1,14 @@ +clc
+//initialization of varaibles
+p=500 //psia
+V2=0.9278 //cu ft
+V1=0.0197 //cu ft
+h2=1204.4 //B/lb
+h1=449.4 //B/lb
+//calculations
+W=p*(V2-V1)*144
+du=h2-h1-144*p*(V2-V1)/778
+du2=h2-h1-W/778
+//results
+printf("Change in internal energy = %.1f Btu",du)
+printf("\n Method 2, Internal energy change = %.1f Btu",du2)
diff --git a/1472/CH5/EX5.4.a/5_4.sce b/1472/CH5/EX5.4.a/5_4.sce new file mode 100755 index 000000000..c7076cd6e --- /dev/null +++ b/1472/CH5/EX5.4.a/5_4.sce @@ -0,0 +1,15 @@ +clc
+//initialization of varaibles
+P1=75 //psia
+P2=15 //psia
+V1=6 //cu ft
+g=1.2
+m=3
+//calculations
+V2=V1*(P1/P2)^(1/g)
+U=0.48*(P2*V2-P1*V1)
+W=(P2*V2-P1*V1)*144/((1-g)*778)
+Q=U+W
+//results
+printf("Heat = %.3f Btu",Q)
+//The answer given in textbook is wrong. please check using a calculator
diff --git a/1472/CH5/EX5.4.b/5_4b.sce b/1472/CH5/EX5.4.b/5_4b.sce new file mode 100755 index 000000000..5630a23fd --- /dev/null +++ b/1472/CH5/EX5.4.b/5_4b.sce @@ -0,0 +1,15 @@ +clc
+//initialization of varaibles
+P1=75 //psia
+P2=15 //psia
+V1=6 //cu ft
+g=1.2
+m=3
+//calculations
+Q=30 //Btu
+V2=V1*(P1/P2)^(1/g)
+U=0.48*(P2*V2-P1*V1)
+W=Q-U
+//results
+printf("Work done = %.1f Btu",W)
+//The answer given in textbook is wrong. please check using a calculator
|