1 files changed, 20 insertions, 0 deletions
diff --git a/551/CH5/EX5.28/28.sce b/551/CH5/EX5.28/28.sce
new file mode 100755
index 000000000..92e830c06
--- /dev/null
+++ b/551/CH5/EX5.28/28.sce
@@ -0,0 +1,20 @@
+clc
+p1=7*10^5; //Pa
+T1=733; //K
+p2=1.012*10^5; //Pa
+T2a=433; //K
+y=1.4;
+cp=1.005;
+
+disp("(i) To prove that the process is irreversible")
+T2=T1*(p2/p1)^((y-1)/y);
+disp("T2 =")
+disp(T2)
+disp("But the actual temperature is 433K at th epressure of 1.012 bar, Hence the process is irreversible. Proved.")
+
+
+disp("(ii) Change of entropy per kg of air")
+ds=cp*log(T2a/T2);
+disp("Increase of entropy=")
+disp(ds)
+disp("kJ/kg.K")
+\ No newline at end of file