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
9
Task/Jensens-Device/Nim/jensens-device.nim
Normal file
9
Task/Jensens-Device/Nim/jensens-device.nim
Normal file
|
|
@ -0,0 +1,9 @@
|
|||
var i: int
|
||||
|
||||
proc harmonicSum(i: var int, lo, hi, term): float =
|
||||
i = lo
|
||||
while i <= hi:
|
||||
result += term()
|
||||
inc i
|
||||
|
||||
echo harmonicSum(i, 1, 100, proc: float = 1.0 / float(i))
|
||||
1
Task/Jensens-Device/Oforth/jensens-device.oforth
Normal file
1
Task/Jensens-Device/Oforth/jensens-device.oforth
Normal file
|
|
@ -0,0 +1 @@
|
|||
: mysum(lo, hi, term) | i | 0 lo hi for: i [ i term perform + ] ;
|
||||
9
Task/Jensens-Device/Sidef/jensens-device.sidef
Normal file
9
Task/Jensens-Device/Sidef/jensens-device.sidef
Normal file
|
|
@ -0,0 +1,9 @@
|
|||
var i;
|
||||
func sum (i, lo, hi, term) {
|
||||
var temp = 0;
|
||||
for (*i = lo; *i <= hi; (*i)++) {
|
||||
temp += term.run;
|
||||
};
|
||||
return temp;
|
||||
};
|
||||
say sum(\i, 1, 100, { 1 / i });
|
||||
11
Task/Jensens-Device/Swift/jensens-device.swift
Normal file
11
Task/Jensens-Device/Swift/jensens-device.swift
Normal file
|
|
@ -0,0 +1,11 @@
|
|||
var i = 42 // initial value doesn't matter
|
||||
|
||||
func sum(inout i: Int, lo: Int, hi: Int, @autoclosure term: () -> Double) -> Double {
|
||||
var result = 0.0
|
||||
for i = lo; i <= hi; i++ {
|
||||
result += term()
|
||||
}
|
||||
return result
|
||||
}
|
||||
|
||||
println(sum(&i, 1, 100, 1 / Double(i)))
|
||||
5
Task/Jensens-Device/jq/jensens-device.jq
Normal file
5
Task/Jensens-Device/jq/jensens-device.jq
Normal file
|
|
@ -0,0 +1,5 @@
|
|||
def sum(lo; hi; term):
|
||||
reduce range(lo; hi+1) as $i (0; . + ($i|term));
|
||||
|
||||
# The task:
|
||||
sum(1;100;1/.)
|
||||
Loading…
Add table
Add a link
Reference in a new issue