RosettaCodeData/Task/Empty-string/Applesoft-BASIC/empty-string.basic

mirror of https://github.com/acmeism/RosettaCodeData.git
 10  LET A$ = "
 40  IF  LEN (A$) = 0 THEN  PRINT "THE STRING IS EMPTY"
 50  IF  LEN (A$) THEN  PRINT "THE STRING IS NOT EMPTY"
	`10 LET A$ = "`
	`40 IF LEN (A$) = 0 THEN PRINT "THE STRING IS EMPTY"`
	`50 IF LEN (A$) THEN PRINT "THE STRING IS NOT EMPTY"`