preview

Astronomy Quiz

Good Essays
Open Document

% Ernesto Robles
% Csci 130 Final clc clear all fprintf(' This program revolves around planetary motion and gravity. \n It comes with the ability to view a simulation of orbit patterns... \n \r ')
Answer=menu ( 'Would you like to view a planetary simulation?','Yes!', 'No. =('); if Answer== 1 disp(' At the top of the pop-up screen please select "simulation" and then "start". ') disp(' When you are satisfied please exit from both pop-up windows and run the next section ') vrplanets elseif Answer==2 disp(' Very well then. Please run the next section. ') end %% global G M R a ms Vnew ALT
G=6.67e-11;
% Here is a menu created that will prompt user to select a planet in which
% we will be using for our calculations. After chosing a planet from the
% menu they will …show more content…

\n' ) while or < 0 disp(' This value must be positive ( a satelite can''t orbit at an altitude less than a planet''s radius )') or=input(' Please select a new value for orbit radius ') for or = 0 disp(' This value must be greater than zero ( a satelite can''t orbit at a planet''s radius )') or=input(' Please select a new value for orbit radius ') end end fprintf(' Given the altitude above the planet''s surface (radius of planet + desired orbit height (or)) \n we can then calculate the initial velocity of the satelite.') a=R+(or*1000) % a is the altitude and is dependent upon user input
Vinitial=sqrt((G*M)./a);
fprintf('Initial velocity of the satelite is:%5.0f m/s \n \r', Vinitial) %Using the initial velocity we can now calculate the orbital period of the
%satelite and use this to find how long it takes to make one

Get Access
Related
Get Access