1 files changed, 17 insertions, 0 deletions
diff --git a/1922/CH4/EX4.8/4_8.sce b/1922/CH4/EX4.8/4_8.sce
new file mode 100755
index 000000000..c36e97bc1
--- /dev/null
+++ b/1922/CH4/EX4.8/4_8.sce
@@ -0,0 +1,17 @@
+clc
+clear
+//Initialization of variables
+m=5000 ///kg/h
+cp=3.2 //kJ/kg K
+Ts=30+273.1 //K
+t1=220 //C
+t2=40 //C
+Q=2.88*10^6 //kJ
+//calculations
+Q=m*cp*(t2-t1)
+dss=m*cp*log((t2+273.1)/(t1+273.1))
+Wlost=Ts*dss-Q
+eff=Ts*dss/Q
+//results
+printf("Lost work = %d kJ",Wlost)
+printf("\n Efficiency = %.3f",eff)