summaryrefslogtreecommitdiff
path: root/32/CH3/EX3.16/3_16.sce
diff options
context:
space:
mode:
Diffstat (limited to '32/CH3/EX3.16/3_16.sce')
-rwxr-xr-x32/CH3/EX3.16/3_16.sce17
1 files changed, 17 insertions, 0 deletions
diff --git a/32/CH3/EX3.16/3_16.sce b/32/CH3/EX3.16/3_16.sce
new file mode 100755
index 000000000..cb31d0299
--- /dev/null
+++ b/32/CH3/EX3.16/3_16.sce
@@ -0,0 +1,17 @@
+//pathname=get_absolute_file_path('3.16.sce')
+//filename=pathname+filesep()+'3.16-data.sci'
+//exec(filename)
+//Initial pressure(in MPa):
+pi=0.5
+//Initial volume(in m^3):
+vi=0.5
+//Final pressure(in MPa):
+pf=1
+//Atmospheric pressure(in Pa):
+patm=1.013*10^5
+//Final volume(in m^3):
+vf=3*vi
+//Work done(in J):
+W=(vf-vi)*(pi+pf)*10^5/2
+printf("\nRESULT\n")
+printf("\nWork done = %d J",W) \ No newline at end of file