summaryrefslogtreecommitdiff
path: root/24/CH12/EX12.1/Example12_1.sce
blob: c19981d70fbe355a3a6dc1cab3efe756061aa6af (plain)
1
2
3
4
5
6
7
8
9
10
11
//Given that
M = 1.4  //in kg
R = 8.5*10^-2  //in meter
v = 15*10^-2  //in meter

//Sample Problem 12-1
printf("**Sample Problem 12-1**\n")
I = 0.5*M*R^2
w = v/R
K = 0.5*M*v^2 + 0.5*I*w^2
printf("The total kinetic energy of the disk is %fJ", K)