REM to print Square of First 10 Natural Numbers DECLARE SUB NUM () CLS CALL NUM END SUB NUM PRINT "SQUARE", "CUBE" FOR I = 1 TO 10 PRINT I ^ 2, I ^ 3 NEXT I END SUB