Determine if a string has all unique characters: Difference between revisions
Content deleted Content added
Easylang |
|||
Line 1,265:
h = strcode s$[i]
if d[h] <> 0
write "
print "' positions: " & d[h] & ", " & i
return
.
Line 1,276:
s$ = input
until s$ = "EOF"
print "'" & s$ & "'" & " length " & len s$
call unichar s$
print ""
|