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
15
Task/Infinity/ERRE/infinity.erre
Normal file
15
Task/Infinity/ERRE/infinity.erre
Normal file
|
|
@ -0,0 +1,15 @@
|
|||
PROGRAM INFINITY
|
||||
|
||||
EXCEPTION
|
||||
PRINT("INFINITY")
|
||||
ESCI%=TRUE
|
||||
END EXCEPTION
|
||||
|
||||
BEGIN
|
||||
ESCI%=FALSE
|
||||
K=1
|
||||
WHILE 2^K>0 DO
|
||||
EXIT IF ESCI%
|
||||
K+=1
|
||||
END WHILE
|
||||
END PROGRAM
|
||||
8
Task/Infinity/FreeBASIC/infinity.freebasic
Normal file
8
Task/Infinity/FreeBASIC/infinity.freebasic
Normal file
|
|
@ -0,0 +1,8 @@
|
|||
' FB 1.05.0 Win64
|
||||
|
||||
#Include "crt/math.bi"
|
||||
#Print Typeof(1.5) ' Prints DOUBLE at compile time
|
||||
|
||||
Dim d As Typeof(1.5) = INFINITY
|
||||
Print d; " (String representation of Positive Infinity)"
|
||||
Sleep
|
||||
3
Task/Infinity/Lasso/infinity.lasso
Normal file
3
Task/Infinity/Lasso/infinity.lasso
Normal file
|
|
@ -0,0 +1,3 @@
|
|||
infinity
|
||||
'<br />'
|
||||
infinity -> type
|
||||
7
Task/Infinity/Lingo/infinity.lingo
Normal file
7
Task/Infinity/Lingo/infinity.lingo
Normal file
|
|
@ -0,0 +1,7 @@
|
|||
x = (1-power(2, -53)) * power(2, 1023) * 2
|
||||
put ilk(x), x
|
||||
-- #float 1.79769313486232e308
|
||||
|
||||
x = (1-power(2, -53)) * power(2, 1023) * 3
|
||||
put ilk(x), x, -x
|
||||
-- #float INF -INF
|
||||
1
Task/Infinity/Nim/infinity-1.nim
Normal file
1
Task/Infinity/Nim/infinity-1.nim
Normal file
|
|
@ -0,0 +1 @@
|
|||
inf
|
||||
2
Task/Infinity/Nim/infinity-2.nim
Normal file
2
Task/Infinity/Nim/infinity-2.nim
Normal file
|
|
@ -0,0 +1,2 @@
|
|||
var f = inf
|
||||
echo f
|
||||
1
Task/Infinity/Oforth/infinity.oforth
Normal file
1
Task/Infinity/Oforth/infinity.oforth
Normal file
|
|
@ -0,0 +1 @@
|
|||
10 1000.0 powf dup println dup neg println 1 swap / println
|
||||
2
Task/Infinity/Phix/infinity.phix
Normal file
2
Task/Infinity/Phix/infinity.phix
Normal file
|
|
@ -0,0 +1,2 @@
|
|||
constant infinity = 1e300*1e300
|
||||
? infinity
|
||||
11
Task/Infinity/Sidef/infinity.sidef
Normal file
11
Task/Infinity/Sidef/infinity.sidef
Normal file
|
|
@ -0,0 +1,11 @@
|
|||
var a = 1.5/0; # inf
|
||||
say a.is_inf; # true
|
||||
say a.is_pos; # true
|
||||
|
||||
var b = -1.5/0; # -inf
|
||||
say b.is_inf; # true
|
||||
say b.is_neg; # true
|
||||
|
||||
var inf = Math.inf;
|
||||
var ninf = -Math.inf;
|
||||
say (inf == -ninf); # true
|
||||
2
Task/Infinity/Swift/infinity-1.swift
Normal file
2
Task/Infinity/Swift/infinity-1.swift
Normal file
|
|
@ -0,0 +1,2 @@
|
|||
let inf = Double.infinity
|
||||
inf.isInfinite //true
|
||||
3
Task/Infinity/Swift/infinity-2.swift
Normal file
3
Task/Infinity/Swift/infinity-2.swift
Normal file
|
|
@ -0,0 +1,3 @@
|
|||
func getInf() -> Double {
|
||||
return Double.infinity
|
||||
}
|
||||
2
Task/Infinity/Ursa/infinity.ursa
Normal file
2
Task/Infinity/Ursa/infinity.ursa
Normal file
|
|
@ -0,0 +1,2 @@
|
|||
decl double d
|
||||
set d Infinity
|
||||
1
Task/Infinity/jq/infinity-1.jq
Normal file
1
Task/Infinity/jq/infinity-1.jq
Normal file
|
|
@ -0,0 +1 @@
|
|||
def infinite: 1e1000;
|
||||
1
Task/Infinity/jq/infinity-2.jq
Normal file
1
Task/Infinity/jq/infinity-2.jq
Normal file
|
|
@ -0,0 +1 @@
|
|||
def isinfinite: . == infinite;
|
||||
Loading…
Add table
Add a link
Reference in a new issue