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
21
Task/Ordered-words/Nim/ordered-words.nim
Normal file
21
Task/Ordered-words/Nim/ordered-words.nim
Normal file
|
|
@ -0,0 +1,21 @@
|
|||
import httpclient, strutils
|
||||
|
||||
proc isSorted(s): bool =
|
||||
var last = low(char)
|
||||
for c in s:
|
||||
if c < last:
|
||||
return false
|
||||
last = c
|
||||
return true
|
||||
|
||||
const url = "http://www.puzzlers.org/pub/wordlists/unixdict.txt"
|
||||
var mx = 0
|
||||
var words: seq[string] = @[]
|
||||
|
||||
for word in getContent(url).split():
|
||||
if word.len >= mx and isSorted(word):
|
||||
if word.len > mx:
|
||||
words = @[]
|
||||
mx = word.len
|
||||
words.add(word)
|
||||
echo words.join(" ")
|
||||
Loading…
Add table
Add a link
Reference in a new issue