diff options
Diffstat (limited to '1571/CH9/EX9.6/Chapter9_Example6.sce')
| -rwxr-xr-x | 1571/CH9/EX9.6/Chapter9_Example6.sce | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/1571/CH9/EX9.6/Chapter9_Example6.sce b/1571/CH9/EX9.6/Chapter9_Example6.sce new file mode 100755 index 000000000..7bdffa0a4 --- /dev/null +++ b/1571/CH9/EX9.6/Chapter9_Example6.sce @@ -0,0 +1,14 @@ +clc
+clear
+
+//INPUT
+t1=373;//temperature in K
+t2=273;//temperature of sink in K
+q=10^4;//heat taken at higher temperature in cal
+j=4.2*10^7;//joules constant in ergs/cal
+
+//CALCULATIONS
+w=q*j*(t1-t2)/t1;//work done in ergs
+
+//OUTPUT
+mprintf('work done is %3.2f ergs',w)
|