< previous page page_437 next page >

Page 437
Main                                                                                                    Level 0
Get data
Set totalWt =
  EMPTY_WEIGHT + (passengers + crew) 
* 170 +
  baggage + closet + fuel 
* 6.7
Set centerOfGravity =
  (CrewMoment(crew) + PassengerMoment(passengers) +
  CargoMoment(closet, baggage) + FuelMoment(fuel) +
  EMPTY_MOMENT) / totalWt
Print totalWt and centerOfGravity
Print warning

Get Data (Out: crew, passengers, closet, baggage, fuel)                    Level 1
Prompt for number of crew, number of passengers,
 weight in closet and baggage compartments,
 and gallons of fuel
Read crew, passengers, closet, baggage, fuel
Echo-print the input

Crew Moment (In: crew) Out: Function value
Return crew * 170 * 143

 
< previous page page_437 next page >