summaryrefslogtreecommitdiff
path: root/551/CH5/EX5.29/29.sce
diff options
context:
space:
mode:
Diffstat (limited to '551/CH5/EX5.29/29.sce')
-rwxr-xr-x551/CH5/EX5.29/29.sce38
1 files changed, 38 insertions, 0 deletions
diff --git a/551/CH5/EX5.29/29.sce b/551/CH5/EX5.29/29.sce
new file mode 100755
index 000000000..683ec0905
--- /dev/null
+++ b/551/CH5/EX5.29/29.sce
@@ -0,0 +1,38 @@
+clc
+V1=0.3; //m^3
+p1=4*10^5; //N/m^2
+V2=0.08; //m^3
+n=1.25;
+p2=p1*(V1/V2)^n;
+
+disp("(i) Change in enthalpy")
+dH=n*(p2*V2-p1*V1)/(n-1)/10^3;
+disp("dH=")
+disp(dH)
+disp("kJ")
+
+
+disp("(ii) Change in internal energy")
+dU=dH-(p2*V2 - p1*V1)/10^3;
+disp("dU=")
+disp(dU)
+disp("kJ")
+
+
+disp("(iii) Change in entropy")
+dS=0;
+disp("dS")
+disp(dS)
+
+
+disp("(iv)Heat transfer")
+Q=0;
+disp("Q=")
+disp(Q)
+
+
+disp("(v) Work transfer")
+W=Q-dU;
+disp("W=")
+disp(W)
+disp("kJ") \ No newline at end of file