summaryrefslogtreecommitdiff
path: root/1286/CH6/EX6.19/6_19.sce
blob: 28c38b4b6e3437c7e3eb1b96ffefd6924ce1a2f4 (plain)
1
2
3
4
5
6
7
8
9
10
clc
//initialisation
f=5
r=2
//CALCULATIONS
e=f/2
g=r/2
p=g*100/e
//results
printf(' fraction used to increase rotational energy= % 1f ',p)