diff options
Diffstat (limited to '2417/CH6/EX6.7')
| -rwxr-xr-x | 2417/CH6/EX6.7/Ex6_7.sce | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/2417/CH6/EX6.7/Ex6_7.sce b/2417/CH6/EX6.7/Ex6_7.sce new file mode 100755 index 000000000..7f3e5358d --- /dev/null +++ b/2417/CH6/EX6.7/Ex6_7.sce @@ -0,0 +1,14 @@ +clear;
+clc;
+printf("\t\t\tProblem Number 6.7\n\n\n");
+// Chapter 6: The Ideal Gas
+// Problem 6.7 (page no. 245)
+// Solution
+
+//Applying , (p1*V1)/T1 = (p2*V2)/T2
+//and p2=p1*(T2/T1) because V1=V2
+p1=200+14.7; //Unit:psia //initial pressure
+T2=460+200; //final temperature is 200 F //Fahrenheit temperature converted to absolute temperature //unit:R
+T1=460+73; //Fahrenheit temperature converted to absolute temperature //unit:R
+p2=p1*(T2/T1); //final pressure //Unit:psia //Charles's law(volume constant)
+printf("The final pressure is %f psia",p2);
|