diff options
Diffstat (limited to '2135/CH5/EX5.5')
-rwxr-xr-x | 2135/CH5/EX5.5/Exa_5_5.sce | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/2135/CH5/EX5.5/Exa_5_5.sce b/2135/CH5/EX5.5/Exa_5_5.sce new file mode 100755 index 000000000..baf9995a4 --- /dev/null +++ b/2135/CH5/EX5.5/Exa_5_5.sce @@ -0,0 +1,16 @@ +//Exa 5.5
+clc;
+clear;
+close;
+format('v',6);
+
+//Given Data :
+P=1;//KW or KJ/s
+Q=6;//MJ/hr
+Q=Q*1000/3600;//KJ/s
+T1=26+273;//Kelvin
+T2=3+273;//Kelvin
+COP=T1/(T1-T2);
+W=Q/COP;//KJ/s or KW
+disp(W,"Work required to pump heat in KJ/s or KW : ");
+disp("As P>W, required condition can be maintained.")
|