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