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
1
Task/Factorial/Wortel/factorial-1.wortel
Normal file
1
Task/Factorial/Wortel/factorial-1.wortel
Normal file
|
|
@ -0,0 +1 @@
|
|||
@fac 10
|
||||
1
Task/Factorial/Wortel/factorial-2.wortel
Normal file
1
Task/Factorial/Wortel/factorial-2.wortel
Normal file
|
|
@ -0,0 +1 @@
|
|||
!#~F 10
|
||||
3
Task/Factorial/Wortel/factorial-3.wortel
Normal file
3
Task/Factorial/Wortel/factorial-3.wortel
Normal file
|
|
@ -0,0 +1,3 @@
|
|||
!/^* @to 10
|
||||
; or
|
||||
@prod @to 10
|
||||
6
Task/Factorial/Wortel/factorial-4.wortel
Normal file
6
Task/Factorial/Wortel/factorial-4.wortel
Normal file
|
|
@ -0,0 +1,6 @@
|
|||
~!10 &n [
|
||||
@var r 1
|
||||
@for x to n
|
||||
:!*r x
|
||||
r
|
||||
]
|
||||
14
Task/Factorial/Wortel/factorial-5.wortel
Normal file
14
Task/Factorial/Wortel/factorial-5.wortel
Normal file
|
|
@ -0,0 +1,14 @@
|
|||
@let {
|
||||
fac &{fac n}?{
|
||||
<n 2 n
|
||||
*n !fac -n 1
|
||||
}
|
||||
|
||||
; memoized
|
||||
facM @mem &n?{
|
||||
<n 2 n
|
||||
*n !facM -n 1
|
||||
}
|
||||
|
||||
[[!fac 10 !facM 10]]
|
||||
}
|
||||
Loading…
Add table
Add a link
Reference in a new issue