diff options
Diffstat (limited to '2510/CH9/EX9.3')
-rwxr-xr-x | 2510/CH9/EX9.3/Ex9_3.sce | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/2510/CH9/EX9.3/Ex9_3.sce b/2510/CH9/EX9.3/Ex9_3.sce new file mode 100755 index 000000000..9ce1307c9 --- /dev/null +++ b/2510/CH9/EX9.3/Ex9_3.sce @@ -0,0 +1,14 @@ +//Variable declaration: +h = 48.0 //Convective heat transfer coefficient (Btu/h.ft.°F) +A = 2*1.5 //Total heat transfer area (ft^2) +Ts = 530.0 //Surface temperature of plate (°F) +Tm = 105.0 //Maintained temperature of opposite side of plate (°F) +kW = 3.4123*10**3 //Units kW in a Btu/h + +//Calculation: +Q = h*A*(Ts-Tm) //Heat transfer rate in Btu/h (Btu/h) +Q1 = Q/kW //Heat transfer rate in kW (kW) + +//Result: +printf("The heat transfer rate in Btu/h is : %f Btu/h.",Q) +printf("The heat transfer rate in kW is : %.2f kW.",Q1) |