sample code to run pascal basic arithmetic