15 lines
301 B
Plaintext
15 lines
301 B
Plaintext
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$
|