PROC main:
  LOCAL a%,b%
  PRINT "Please enter a number:",
  INPUT a%
  PRINT "Please enter another number:",
  INPUT b%
  PRINT a%;"+";b%;"=";a%+b%
  PRINT a%;"-";b%;"=";a%-b%
  PRINT a%;"×";b%;"=";a%*b%
  PRINT a%;"÷";b%;"=";a%/b%
  PRINT a%;"%";b%;"=";a%-a%/b%*b%
  PRINT a%;"^";b%;"=";a%**b%
  GET
ENDP