Add tasks for all the new languages
This commit is contained in:
parent
9dc3c2bb62
commit
bba7bfd280
13208 changed files with 134745 additions and 0 deletions
18
Task/Search-a-list/Ring/search-a-list.ring
Normal file
18
Task/Search-a-list/Ring/search-a-list.ring
Normal file
|
|
@ -0,0 +1,18 @@
|
|||
haystack = ["alpha","bravo","charlie","delta","echo","foxtrot","golf",
|
||||
"hotel","india","juliet","kilo","lima","mike","needle",
|
||||
"november","oscar","papa","quebec","romeo","sierra","tango",
|
||||
"needle","uniform","victor","whisky","x-ray","yankee","zulu"]
|
||||
|
||||
needle = "needle"
|
||||
maxindex = len(haystack)
|
||||
|
||||
for index = 1 to maxindex
|
||||
if needle = haystack[index] exit ok
|
||||
next
|
||||
if index <= maxindex
|
||||
see "first found at index " + index + nl ok
|
||||
for last = maxindex to 0 step -1
|
||||
if needle = haystack[last] exit ok
|
||||
next
|
||||
if !=index see " last found at index " + last + nl
|
||||
else see "not found" + nl ok
|
||||
Loading…
Add table
Add a link
Reference in a new issue