a$ = "2 3 5 7 11 13 17 19 cats 222 -100.2 +11 1.1 +7 7. 7 5 5 3 2 0 4.4 2" for i = 1 to len(a$) a1$ = word$(a$,i) if a1$ = "" then exit for for i1 = 1 to len(b$) if a1$ = word$(b$,i1) then [nextWord] next i1 b$ = b$ + a1$ + " " [nextWord] next i print "Dups:";a$ print "No Dups:";b$