Unnamed

// main module
Module main()
	// Get amount of Class A tickets sold
	Call getClassASold()
	
	// Get amount of Class B tickets sold
	Call getClassBSold()
	
	// Get amount of Class C tickets sold
	Call getClassCSold()
	
	// Display totals
	Call showTotalSales
End Module
	
Module getClassASold(Real Ref classASold)
	Display "How many Class A tickets were sold?"
	Input classASold
End Module

Module getClassBSold(Real Ref classBSold)
	Display "How many Class B tickets were sold?"
	Input classBSold
End Module

Module getClassCSold(Real Ref classCSold)
	Display "How many Class C tickets were sold?"
	Input classCSold
End Module

Module showTotalSales(Real classASold, Real classBSold, Real classCSold)
	Declare Real totalSales
	Set totalSales = (classASold * CLASS_A) + (classBSold * CLASS_B) + (classCSold * CLASS_C)
	Display "The total income generated is $", totalSales
End Module