summaryrefslogtreecommitdiff
path: root/1571/CH8/EX8.9/Chapter8_Example9.sce
diff options
context:
space:
mode:
Diffstat (limited to '1571/CH8/EX8.9/Chapter8_Example9.sce')
-rwxr-xr-x1571/CH8/EX8.9/Chapter8_Example9.sce13
1 files changed, 13 insertions, 0 deletions
diff --git a/1571/CH8/EX8.9/Chapter8_Example9.sce b/1571/CH8/EX8.9/Chapter8_Example9.sce
new file mode 100755
index 000000000..005ca3e92
--- /dev/null
+++ b/1571/CH8/EX8.9/Chapter8_Example9.sce
@@ -0,0 +1,13 @@
+clc
+clear
+
+//INPUT
+t1=400;//inital temperature in K
+dv=2;//ratio of volumes final and inital
+r=8.31*10^7;//universal gas constant in ergs/kg.K
+
+//CALCULATIONS
+w=r*t1*log(2);//work done in expanding isothermally in ergs
+
+//OUTPUT
+mprintf('the work done in expanding isothermally is %3.2f ergs',w)