aparler/RosettaCodeData
1
0
Fork 0
Code Issues 12 Pull requests 3 Projects Releases Packages Wiki Activity Actions

June 2018 Update

Browse source
This commit is contained in:
Ingy döt Net 2018-06-22 20:57:24 +00:00
parent ba8067c3b7
commit 22f33d4004
5278 changed files with 84726 additions and 14379 deletions
Download patch file Download diff file Expand all files Collapse all files

6
Task/ABC-Problem/Elena/abc-problem.elena
View file

@ -9,19 +9,19 @@ extension op
[
var list := ArrayList new:blocks.
^ $nil == self literal; upperCase; seekEach(:ch)
^ nil == self literal; upperCase; seekEach(:ch)
[
var index := list indexOfElement
((:word)(word indexOf:ch at:0 != -1) asComparator).
if (index>=0)
[ list remove at:index. ^ false ];
[ list removeAt:index. ^ false ];
[ ^ true ]
]
]
}
program =
public program =
[
var blocks := ("BO", "XK", "DQ", "CP", "NA",
"GT", "RE", "TG", "QD", "FS",