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

12 lines
212 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
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