diff options
Diffstat (limited to '1808/CH3/EX3.2/Chapter3_Exampl2.sce')
| -rw-r--r-- | 1808/CH3/EX3.2/Chapter3_Exampl2.sce | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/1808/CH3/EX3.2/Chapter3_Exampl2.sce b/1808/CH3/EX3.2/Chapter3_Exampl2.sce new file mode 100644 index 000000000..8b0234ade --- /dev/null +++ b/1808/CH3/EX3.2/Chapter3_Exampl2.sce @@ -0,0 +1,17 @@ +clc
+clear
+//INPUT DATA
+Tl=150;//engine temprature in Degree C
+Th=1100;//engine temprature in Degree C
+Qs=4000;//Heat is added in kJ/min
+
+//CALCULATIONS
+nc=((Th-Tl)/(Th+273))*100;//Efficiency of carnot cycle in percentage
+wd=nc*Qs/100;//workdone in kJ/min
+P=wd/(60);//power developed in kJ/s
+Qr=Qs-wd;//Quality of heat rejected in kJ/min
+ds=(Qs-wd)/(Tl+273);//Change in entropy during heat rejection in kJ/min
+
+//OUTPUT
+printf('(a)power developed in the engine is %3.2f kJ/s \n (b)Quality of heat rejected is %3.2f kJ/min \n (c)Change in entropy during heat rejection is %3.2f kJ/min',P,Qr,ds)
+
|