RosettaCodeData/Task/Exponentiation-order/XBasic/exponentiation-order.basic

PROGRAM	"Exponentiation order"
VERSION	"0.0000"

DECLARE FUNCTION  Entry ()

FUNCTION  Entry ()
  PRINT "5^3^2   ="; 5**3**2
  PRINT "(5^3)^2 ="; (5**3)**2
  PRINT "5^(3^2) ="; 5**(3**2)
END FUNCTION
END PROGRAM