diff options
Diffstat (limited to '3788/CH2/EX2.1.3/Ex2_1_3.sce')
| -rw-r--r-- | 3788/CH2/EX2.1.3/Ex2_1_3.sce | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/3788/CH2/EX2.1.3/Ex2_1_3.sce b/3788/CH2/EX2.1.3/Ex2_1_3.sce new file mode 100644 index 000000000..503bb20b7 --- /dev/null +++ b/3788/CH2/EX2.1.3/Ex2_1_3.sce @@ -0,0 +1,19 @@ +//Example 2.1.3
+//Elliptical Orbit
+
+//Variable Declaration
+re=6378.14
+hp=1000
+ha=4000
+u=3.98600*((10)^5)
+
+//Calculation
+a=(2*re+hp+ha)/2
+T=sqrt((4*(%pi^2)*(a^3)/u))
+
+e=1-((re+hp)/a) //Eccentricity of orbit
+
+//Result
+printf("The period of orbit is : %f seconds",T)
+disp(e,'Eccentricity of orbit')
+
|