diff options
Diffstat (limited to '2873/CH4/EX4.10')
-rwxr-xr-x | 2873/CH4/EX4.10/Ex4_10.jpg | bin | 0 -> 216550 bytes | |||
-rwxr-xr-x | 2873/CH4/EX4.10/Ex4_10.sce | 25 |
2 files changed, 25 insertions, 0 deletions
diff --git a/2873/CH4/EX4.10/Ex4_10.jpg b/2873/CH4/EX4.10/Ex4_10.jpg Binary files differnew file mode 100755 index 000000000..ae99ab565 --- /dev/null +++ b/2873/CH4/EX4.10/Ex4_10.jpg diff --git a/2873/CH4/EX4.10/Ex4_10.sce b/2873/CH4/EX4.10/Ex4_10.sce new file mode 100755 index 000000000..586fdca65 --- /dev/null +++ b/2873/CH4/EX4.10/Ex4_10.sce @@ -0,0 +1,25 @@ +// Display mode
+mode(0);
+// Display warning for floating point exception
+ieee(1);
+clear;
+clc;
+disp("Engineering Thermodynamics by Onkar Singh Chapter 4 Example 10")
+T1=800;//temperature of source in K
+T2=280;//temperature of sink in K
+disp("efficiency of engine,W/Q1=(800-T)/800")
+disp("for refrigerator,COP=Q3/W=280/(T-280)")
+disp("it is given that Q1=Q3=Q")
+disp("so,from engine,W/Q=(800-T)/800")
+disp("from refrigerator,Q/W=280/(T-280)")
+disp("from above two(Q/W)may be equated,")
+disp("(T-280)/280=(800-T)/800")
+T=2*280*800/(800+280)
+disp("so temperature(T)in K")
+T
+disp("efficiency of engine(n)is given as")
+disp("n=(800-T)/800")
+n=(800-T)/800
+disp("COP of refrigerator is given as")
+disp("COP=280/(T-280)")
+COP=280/(T-280)
|