OPL Calculation Of Climb Speed

Note:
There is no error handling in these, it's up to you how you want to handle it.
So garbage in will give garbage out. (bit like the chief pilots office)
Revised 01-Mar-2001
 
Back To Index

---------------------START-------------------------

Proc CLM:

REM I called this CLM but you can call it whatever you like

LOCAL W,CS

REM Choose you own size font and style

Print "Enter Aircraft Weight",

Input W

CS=((W-100)/2)+270

REM 280 is the 100 series datum and 270 is the 200 series datum Substitute as required in the above line

CLS

Print "Climb Speed", CS

GET

ENDP

-------------------------END-----------------------

Back To Index