diff options
Diffstat (limited to '2975/CH26/EX26.1w/Ex26_1w.sce')
| -rw-r--r-- | 2975/CH26/EX26.1w/Ex26_1w.sce | 25 |
1 files changed, 25 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)");
+
|