1 files changed, 23 insertions, 0 deletions
diff --git a/2975/CH24/EX24.14w/Ex24_14w.sce b/2975/CH24/EX24.14w/Ex24_14w.sce
new file mode 100644
index 000000000..e8dbe83a8
--- /dev/null
+++ b/2975/CH24/EX24.14w/Ex24_14w.sce
@@ -0,0 +1,23 @@
+//developed in windows 8 operating system 64bit
+//platform Scilab 5.4.1
+//example 24_14w
+
+clc;clear;
+//Given Data
+
+area=8*10^-3;       //Area of cylinder (Unit: m^2)
+temperature_initial=300;        //Initial temperature (Unit: Kelvin)
+volume_initial=2.4*10^-3;       //Initaial volume (Unit: m^3)
+distance=0.1;       //Distance covered by the piston when heated(Unit : m)
+force_constant=8000;    //Force constant of the spring (Unit :N/m)
+init_pressure=1*10^5;   //Initial Pressure (atmospheric pressure)  (Unit: Pa)
+
+//Formula:          (Force=spring constant X Distance ) 
+//Calculation
+
+final_pressure=init_pressure+(force_constant*distance/area);    //Calculating final pressure (Unit : Pascal)
+volume_final=volume_initial+(area*distance);        //Calculating final volume (Unit : m^3)
+
+temperature_final=final_pressure*volume_final*temperature_initial/(init_pressure*volume_initial);       //Calculating final volume (Unit : Kelvin)
+
+disp(temperature_final,"The final temperatue is (Unit: Kelvin)");