1 files changed, 17 insertions, 0 deletions
diff --git a/1571/CH3/EX3.18/Chapter3_Example18.sce b/1571/CH3/EX3.18/Chapter3_Example18.sce
new file mode 100755
index 000000000..7a64fc4f5
--- /dev/null
+++ b/1571/CH3/EX3.18/Chapter3_Example18.sce
@@ -0,0 +1,17 @@
+clc
+clear
+
+//INPUT DATA
+v=1000;//volume of hydrogen in ml
+t=273;//tempature of hydrogen in kelvin
+p=760;//pressure of hydrogen in mm of hg
+w=0.0896;//weigh of hydrogen in gm
+cp=3.409;//specific heat of hydogen in kj/kg-K
+cv=2.411;//specific heat of hydrogen in kj/kg-K
+g=981;//accelaration due to gravity in cm/sec^2
+a=13.6;//density of mercury in gm/cm^2
+
+//CALCULATIONS
+J=(p*v*g*a)/(w*t*(cp-cv));//mechanical equivalent of heat in ergs/cals
+//OUTPUT
+printf('mechanical equivalent of heat is %3.2f ergs/calorie',J)