clc clear all disp(' In The Name Of God '); disp(' ') disp(' this program is for distance glide calcuation' ); disp(' ') disp(' ') CD0=input(' enter your cd0: '); W=input(' enter your weight: '); P=input(' enter your density: '); S=input(' enter your wing area: '); H=input(' enter your height of your aircraft: '); AR=input(' enter your aspect ratio: '); e=input(' enter your e: '); N=0; z=0; z=pi*e*AR; K=1/(z); f=0; f=2*((K*CD0)^0.5); M=1/(f); Ymin=atand(f); VminD=(((2*W)/(P*S))^0.5)*((K/CD0)^0.25); q=0; q=sin(f); RODmin=VminD^(q); Tmax=H/RODmin; u=0; u=tand(Ymin); Dmax=H/u; K M Ymin VminD RODmin Tmax Dmax