summaryrefslogtreecommitdiff
path: root/3843/CH1/EX1.10/Ex1_10.sce
blob: 762c1b3cb83738241ddda7f608b7855e4acb0d1d (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
// Example 1_10
clc;funcprot(0);
// Given data
m_a=2200;// kg
V_a1=90*(1000/3600);// m/s
V_a2=50*(1000/3600);// m/s
m_b=1000;// kg
V_b2=88*(1000/3600);// m/s

// Calculation
KE_1=(1/2)*m_a*V_a1^2;// J
KE_2=((1/2)*m_a*V_a2^2)+((1/2)*m_b*V_b2^2);// J
// dU=U_2-U_1
dU=KE_1-KE_2;// J
printf("\nThe increase in internal energy,U_2-U_1=%6.0f J or %3.1f kJ",dU,dU/1000);
// The answer vary due to round off error