summaryrefslogtreecommitdiff
path: root/2219/CH11/EX11.8/Ex11_8.sce
blob: 24bfab0297e518fb17e68df056ec35d22543ff6b (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
// Chapter 11 example 8
//------------------------------------------------------------------------------
clc;
clear;
// Given data
Apogee  = 30000;        // Apogee pt of satellite elliptical orbit
Perige  = 1000;         // perigee pt of satellite elliptical orbit

// Calculations
a       = (Apogee + Perige)/2;  // semi major axis

// output
mprintf('Semi-major axis = %d Km',a);
//------------------------------------------------------------------------------