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
|
|
@ -0,0 +1,15 @@
|
|||
proc halve(x): int = x div 2
|
||||
proc double(x): int = x * 2
|
||||
proc even(x): bool = x mod 2 == 0
|
||||
|
||||
proc ethiopian(x, y): int =
|
||||
var x = x
|
||||
var y = y
|
||||
|
||||
while x >= 1:
|
||||
if not even x:
|
||||
result += y
|
||||
x = halve x
|
||||
y = double y
|
||||
|
||||
echo ethiopian(17, 34)
|
||||
Loading…
Add table
Add a link
Reference in a new issue