diff options
Diffstat (limited to '2219/CH11/EX11.11/Ex11_11.sce')
-rwxr-xr-x | 2219/CH11/EX11.11/Ex11_11.sce | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/2219/CH11/EX11.11/Ex11_11.sce b/2219/CH11/EX11.11/Ex11_11.sce new file mode 100755 index 000000000..63085593e --- /dev/null +++ b/2219/CH11/EX11.11/Ex11_11.sce @@ -0,0 +1,17 @@ +// Chapter 11 example 11
+//------------------------------------------------------------------------------
+clc;
+clear;
+// Given data
+G = 6.67*10^-11; // Gravitational constant
+M = 5.98*10^24; // mass of the earth in kg
+Re = 6370*10^3; // radius of earth in m
+
+// Calculations
+u = G*M
+Vesc = sqrt(2*u/Re);
+Ves = Vesc/1000; // escape velocity in km/s
+
+// Output
+mprintf('Escape velocity = %3.1f km/s',Ves);
+//------------------------------------------------------------------------------
|