summaryrefslogtreecommitdiff
path: root/1301/CH5/EX5.16/ex5_16.sce
blob: a27d1461c741c2d11849a256a2ae6a3c2ca05ed6 (plain)
1
2
3
4
5
6
clc;
v=20;   //velocity in m/sec
g=9.8;  //g in m/sec square
h=200;  //height in m
diff=(v*v)/(2*9.8*200);  //calculating Final KE/Initial PE
disp((1-diff)*100,"Percent of initial PE lost = "); //displaying result