diff options
Diffstat (limited to '551/CH4/EX4.28/28.sce')
-rwxr-xr-x | 551/CH4/EX4.28/28.sce | 30 |
1 files changed, 30 insertions, 0 deletions
diff --git a/551/CH4/EX4.28/28.sce b/551/CH4/EX4.28/28.sce new file mode 100755 index 000000000..9e9f9002c --- /dev/null +++ b/551/CH4/EX4.28/28.sce @@ -0,0 +1,30 @@ +clc
+p1=1.02*10^5; //Pa
+T1=295; //K
+V1=0.015; //m^3
+p2=6.8*10^5; //Pa
+y=1.4;
+
+
+disp("(i) Final temperature")
+T2=T1*(p2/p1)^((y-1)/y);
+t2=T2-273;
+disp("t2=")
+disp(t2)
+disp("°C")
+
+
+disp("(ii) Final volume :")
+V2=V1*(p1/p2)^(1/y);
+disp("V2=")
+disp(V2)
+disp("m^3")
+
+
+disp("(iii)Work done")
+R=287;
+m=p1*V1/R/T1;
+W=m*R*(T1-T2)/(y-1)/10^3;
+disp("W=")
+disp(W)
+disp("kJ")
\ No newline at end of file |