RosettaCodeData/Task/Zero-to-the-zero-power/XBasic/zero-to-the-zero-power.basic

PROGRAM  "progname"
VERSION "0.0000"

IMPORT  "xma"   'required for POWER

DECLARE FUNCTION  Entry ()

FUNCTION  Entry ()
    PRINT "0 ^ 0 = "; 0 ** 0
    PRINT "0 ^ 0 = "; POWER(0, 0)
END FUNCTION
END PROGRAM