diff options
Diffstat (limited to '1100/CH3/EX3.2/3_2.sce')
-rwxr-xr-x | 1100/CH3/EX3.2/3_2.sce | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/1100/CH3/EX3.2/3_2.sce b/1100/CH3/EX3.2/3_2.sce new file mode 100755 index 000000000..f32e42f0b --- /dev/null +++ b/1100/CH3/EX3.2/3_2.sce @@ -0,0 +1,12 @@ +clc
+//initialisation of variables
+m=5 //lb
+T1=1540 +460 //R
+T2=540+460 //R
+//CALCULATIONS
+function [cp]=cp(T)
+ cp=0.248+0.448*10^-8 *T*T
+endfunction
+Q=m*intg(T1,T2,cp)
+//Results
+printf ('Net heat transferred to the system = %.2f Btu',Q)
|