diff options
Diffstat (limited to '2975/CH26')
-rw-r--r-- | 2975/CH26/EX26.1w/Ex26_1w.sce | 25 | ||||
-rw-r--r-- | 2975/CH26/EX26.2w/Ex26_2w.sce | 35 | ||||
-rw-r--r-- | 2975/CH26/EX26.3w/Ex26_3w.sce | 25 | ||||
-rw-r--r-- | 2975/CH26/EX26.4w/Ex26_4w.sce | 21 | ||||
-rw-r--r-- | 2975/CH26/EX26.5w/Ex26_5.sce | 18 |
5 files changed, 124 insertions, 0 deletions
diff --git a/2975/CH26/EX26.1w/Ex26_1w.sce b/2975/CH26/EX26.1w/Ex26_1w.sce new file mode 100644 index 000000000..13ea504f8 --- /dev/null +++ b/2975/CH26/EX26.1w/Ex26_1w.sce @@ -0,0 +1,25 @@ +//developed in windows 8 operating system 64bit
+//platform Scilab 5.4.1
+//example 26_1w
+
+clc;clear;
+//Given Data
+
+a_to_b=50; //Absorbption of heat during the part ab (Unit: Joules)
+b_to_c=40; //Work done in on the gas during part bc (Unit: Joules)
+c_to_a=-70; //Rejection of heat during the part ca (Unit: Joules)
+internal_energy_a=1500; // Internal energy at a (Unit: Joules)
+
+//calculation
+//Formula: change in Q=change in U + change in W
+internal_energy_b=internal_energy_a+a_to_b; //Calculation of internal energy at b (Unit: Joules)
+
+internal_energy_c=internal_energy_b+b_to_c; //Calculation of internal energy at c (Unit: Joules)
+
+change_energy_c2a=internal_energy_a-internal_energy_c; //Calculation of change in internal energy (Unit: Joules)
+work_done_ca=c_to_a-change_energy_c2a; //Calculating the work done during the part ca (Unit: Joules)
+
+disp(internal_energy_b,"The internal energy at b (Unit : Joules)");
+disp(internal_energy_c,"The internal energy at c (Unit : Joules)");
+disp(work_done_ca,"The work done by the gas during the part ca (Unit : Joules)");
+
diff --git a/2975/CH26/EX26.2w/Ex26_2w.sce b/2975/CH26/EX26.2w/Ex26_2w.sce new file mode 100644 index 000000000..385dcc77d --- /dev/null +++ b/2975/CH26/EX26.2w/Ex26_2w.sce @@ -0,0 +1,35 @@ +//developed in windows 8 operating system 64bit
+//platform Scilab 5.4.1
+//example 26_2w
+
+clc;clear;
+//Given Data
+
+press_a=100*10^3; //Pressure at point a (Unit: Pascal)
+press_b=100*10^3; //Pressure at point b (Unit: Pascal)
+press_d=200*10^3; //Pressure at point c (Unit: Pascal)
+press_c=200*10^3; //Pressure at point d (Unit: Pascal)
+vol_a=100*10^-6; //Volume at point a (Unit: m^3)
+vol_d=100*10^-6; //Volume at point b (Unit: m^3)
+vol_c=300*10^-6; //Volume at point c (Unit: m^3)
+vol_b=300*10^-6; //Volume at point d (Unit: m^3)
+change_u=0; //Change in internal energy (Unit: Joules)
+
+//Formula : Work done=pressure X change in volume
+
+//Calculation
+
+wd_ab=press_a*(vol_b-vol_a); //Calculation of work done by the gas during ab (Unit : Joules)
+wd_bc=press_b*(vol_c-vol_b); //Calculation of work done by the gas during bc (Unit : Joules)
+wd_cd=press_c*(vol_d-vol_c); //Calculation of work done by the gas during cd (Unit : Joules)
+wd_da=press_a*(vol_a-vol_d); //Calculation of work done by the gas during da (Unit : Joules)
+tot_wd=wd_ab+wd_bc+wd_cd+wd_da; //Total Work done during the process (Unit: Joules)
+change_q=tot_wd+change_u; //Calculation of total heat rejected during the process( Unit : Joules)
+
+
+disp(wd_ab,"Total work done during the part ab is (Unit : Joules)");
+disp(wd_bc,"Total work done during the part bc is (Unit : Joules)");
+disp(wd_cd,"Total work done during the part cd is (Unit : Joules)");
+disp(wd_da,"Total work done during the part da is (Unit : Joules)");
+
+disp(change_q,"Total heat rejected by the gas during process is (Unit : Joules)");
diff --git a/2975/CH26/EX26.3w/Ex26_3w.sce b/2975/CH26/EX26.3w/Ex26_3w.sce new file mode 100644 index 000000000..cf8f89d1e --- /dev/null +++ b/2975/CH26/EX26.3w/Ex26_3w.sce @@ -0,0 +1,25 @@ +//developed in windows 8 operating system 64bit
+//platform Scilab 5.4.1
+//example 26_3w
+
+clc;clear;
+//Given Data
+
+mass=1; //Mass of water (Unit: kg)
+temp=100; //Temperature of water (Unit : degree centigrade)
+density_water=1000; //Density of water (Unit: kg/m^3)
+density_steam=0.6; //Density of steam (Unit : kg/m^3)
+pressure=100*10^3; //Pressure of water(Unit : Pascal)
+latent_heat_vapor=2.25*10^6; //Latent heat of vapourzation of water (Unit : Joules/kg)
+
+//Calculation
+
+volume_water=mass/density_water; //Calculation of volume of water (Unit: m^3)
+volume_steam=mass/density_steam; //Calculation of volume of steam (Unit: m^3)
+increased_volume=volume_steam-volume_water; //Calculation of change in volume (Unit; m^3)
+work_done=pressure*increased_volume; //Calculation of work done (Unit: Joules)
+
+change_internal_energy=latent_heat_vapor-work_done; //Calculation of change in internal energy (Unit: Joules)
+
+
+disp(change_internal_energy,"The increase in internal energy of 1 kg water is (Unit:Joules)")
diff --git a/2975/CH26/EX26.4w/Ex26_4w.sce b/2975/CH26/EX26.4w/Ex26_4w.sce new file mode 100644 index 000000000..9c3e17e22 --- /dev/null +++ b/2975/CH26/EX26.4w/Ex26_4w.sce @@ -0,0 +1,21 @@ +//developed in windows 8 operating system 64bit
+//platform Scilab 5.4.1
+//example 26_4w
+
+clc;clear;
+//Given Data
+
+mole=1; //Number of moles of helium gas (Unit:mole)
+area=8.5*10^-4; //Area of the piston (Unit : m^2)
+temp_rise=2; //Temperature rise (Unit : degree centigrade)
+atm_press=100*10^3; //Atmospheric pressure (Unit : Pascal)
+r=8.3; //Gas constant (Unit: J/mol-K)
+change_q=42; //Heat given to the gas (Unit: Joules)
+
+//Calculation
+
+change_u=1.5*mole*r*temp_rise; //Calculation Change in internal energy (Unit: Joules)
+change_w=change_q-change_u; //Calculation Change in work done (Unit: Joules)
+x=change_w/(atm_press*area); //Calculation Distance moved by the piston (Unit: m)
+
+disp(x,"The distance moved by the piston (Unit:m)");
diff --git a/2975/CH26/EX26.5w/Ex26_5.sce b/2975/CH26/EX26.5w/Ex26_5.sce new file mode 100644 index 000000000..264aac730 --- /dev/null +++ b/2975/CH26/EX26.5w/Ex26_5.sce @@ -0,0 +1,18 @@ +//developed in windows 8 operating system 64bit
+//platform Scilab 5.4.1
+//example 26_5w
+
+clc;clear;
+//Given Data
+
+mass=100; //Mass of the steam (Unit: gram)
+temp_init=100; //Initial temperature of the steam (Unit : degree centigrade)
+temp_final=20; //Final temperature of the steam (Unit : degree centigrade)
+latent_heat_steam=540; //Latent heat of vaporization of steam (Unit: cal/gram)
+//Calculation
+
+heat_rejected_condens=mass*latent_heat_steam; //Heat rejected during the condensation of steam in one minute (Unit: cal)
+heat_rejected_cooling=mass*(temp_init-temp_final); //Heat rejected during the cooling of water (Unit: cal)
+heat_rejected_min=heat_rejected_condens+heat_rejected_cooling; //Total heat rejected by the engine per minute (Unit: cal)
+
+disp(heat_rejected_min,"Heat rejected by the engine per minute is (Unit: cal)");
|