From b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b Mon Sep 17 00:00:00 2001 From: priyanka Date: Wed, 24 Jun 2015 15:03:17 +0530 Subject: initial commit / add all books --- 2510/CH11/EX11.7/Ex11_7.sce | 13 +++++++++++++ 1 file changed, 13 insertions(+) create mode 100755 2510/CH11/EX11.7/Ex11_7.sce (limited to '2510/CH11/EX11.7/Ex11_7.sce') diff --git a/2510/CH11/EX11.7/Ex11_7.sce b/2510/CH11/EX11.7/Ex11_7.sce new file mode 100755 index 000000000..afaca937d --- /dev/null +++ b/2510/CH11/EX11.7/Ex11_7.sce @@ -0,0 +1,13 @@ +//Variable declaration: +s = 0.173 //Stefan-Boltzmann constant (Btu/h.ft^2.°R) +EH = 0.5 //Energy transferred from hotter body (Btu/h.ft^2) +EC = 0.75 //Energy transferred to colder body (Btu/h.ft^2) +TH = 1660.0 //Absolute temperature of hotter body (°R) +TC = 1260.0 //Absolute temperature of colder body (°R) + +//Calculation: +E = s*((TH/100.0)**4-(TC/100.0)**4)/((1.0/EH)+(1.0/EC)-1.0) //Net energy exchange per unit area (Btu/h.ft^2) +E = round(E*10**-1)/10**-1 + +//Result: +printf("The net energy exchange per unit area is : %f Btu/h.ft^2.",E) -- cgit