diff options
Diffstat (limited to '1472/CH13/EX13.6.a')
-rwxr-xr-x | 1472/CH13/EX13.6.a/13_6a.sce | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/1472/CH13/EX13.6.a/13_6a.sce b/1472/CH13/EX13.6.a/13_6a.sce new file mode 100755 index 000000000..457b6ec19 --- /dev/null +++ b/1472/CH13/EX13.6.a/13_6a.sce @@ -0,0 +1,13 @@ +clc
+//initialization of varaibles
+v2=15.7 //cu ft/lb
+T2=640 //R
+cv=0.172
+T1=400+460 //R
+//calculations
+du=cv*(T2-T1)
+W=-du
+//results
+printf("Final specific volume = %.1f cu ft/lb",v2)
+printf("\n Final temperature = %d ",T2)
+printf("\n Work done = %.1f B/lb",W)
|