diff options
Diffstat (limited to '1571/CH3/EX3.4/Chapter3_Example4.sce')
-rwxr-xr-x | 1571/CH3/EX3.4/Chapter3_Example4.sce | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/1571/CH3/EX3.4/Chapter3_Example4.sce b/1571/CH3/EX3.4/Chapter3_Example4.sce new file mode 100755 index 000000000..9adb05bb3 --- /dev/null +++ b/1571/CH3/EX3.4/Chapter3_Example4.sce @@ -0,0 +1,17 @@ +clc
+clear
+
+//INPUT DATA
+n=2;//no.of lead blocks
+m=210;//mass of each lead block in gm
+v=20000;//velocity of block relative to earth in cm/sec
+J=4.2*10^7;//mechanical equivalent of heat in ergs/calorie
+cp=0.03;//specific heat of lead in kj/kg-K
+
+//CALCULATIONS
+E=(m*v^2)/2;//kinetic energy of each block in ergs
+E2=n*E;//total kinetic energy in ergs
+T=E2/(J*m*n*cp);//mean rise in temperature in T
+
+//OUTPUT
+mprintf('the mean rise in temperature is %3.1f deg.C',T)
|