Add tasks for all the new languages

This commit is contained in:
Tina Müller 2016-12-05 23:44:36 +01:00
parent 9dc3c2bb62
commit bba7bfd280
13208 changed files with 134745 additions and 0 deletions

View file

@ -0,0 +1,4 @@
For(I,0,10)
Disp I▶Dec,i
I++
End

View file

@ -0,0 +1,7 @@
shared void run() {
for(i in (2..8).by(2)) {
process.write("``i`` ");
}
print("who do we appreciate?");
}

View file

@ -0,0 +1,7 @@
SinOsc s => dac;
for (0 => int i; i < 2000; 5 +=> i )
{
i => s.freq;
100::ms => now;
}

View file

@ -0,0 +1,4 @@
for (0 => int i; i < 2000; 5 +=> i )
{
<<< i >>>;
}

View file

@ -0,0 +1,3 @@
FOR N=2 TO 8 STEP 1.5 DO
PRINT(N)
END FOR

View file

@ -0,0 +1,8 @@
(for ((i (in-range 0 15 2))) (write i))
0 2 4 6 8 10 12 14
(for ((q (in-range 0 15 14/8))) (write q))
0 7/4 7/2 21/4 7 35/4 21/2 49/4 14
(for ((x (in-range 0 15 PI))) (write x))
0 3.141592653589793 6.283185307179586 9.42477796076938 12.566370614359172

View file

@ -0,0 +1 @@
FOR I = 1,3,10; TYPE I, !

View file

@ -0,0 +1,7 @@
' FB 1.05.0 Win64
For i As Integer = 1 To 21 Step 2
Print i; " ";
Next
Print
Sleep

View file

@ -0,0 +1,15 @@
include "ConsoleWindow"
dim as Str15 s(11)
dim as long i
s(0) = "Somewhere"
s(2) = " over"
s(4) = " the"
s(6) = " rainbow" + chr$(13)
s(8) = "Bluebirds"
s(10) = " fly."
for i = 0 to 10 step 2
print s(i);
next

View file

@ -0,0 +1,4 @@
loop(-to=100, -from=1, -by=2) => {^
loop_count
'\r' // for formatting
^}

View file

@ -0,0 +1,5 @@
step = 3
repeat with i = 0 to 10
put i
i = i + (step-1)
end repeat

View file

@ -0,0 +1,5 @@
repeat with n = 0 to 10 step 2
put n after loopn
if n is not 10 then put comma after loopn
end repeat
put loopn

View file

@ -0,0 +1 @@
for x in countdown(10,0,3): echo(x)

View file

@ -0,0 +1 @@
1 100 2 step: i [ i println ]

View file

@ -0,0 +1,6 @@
fun for(from,to,step) type integer,integer,integer->integer
t=to.minus(from).divide(step)
0..t.times(step).plus(from)
/test it for(1 6 2) -> 1 3 5
for(1 3 5)

View file

@ -0,0 +1,4 @@
for i=2 to 8 by 2 do
printf(1,"%d, ",i)
end for
printf(1,"who do we appreciate?\n")

View file

@ -0,0 +1 @@
for i = 0 to 10 step 2 see i + nl next

View file

@ -0,0 +1 @@
for i = 0 to 10 step 0.5 see i + nl next

View file

@ -0,0 +1,25 @@
10101000000000100000000000000000 0. -21 to c
00101000000001100000000000000000 1. c to 20
00101000000000100000000000000000 2. -20 to c
01101000000000010000000000000000 3. Sub. 22
10101000000001100000000000000000 4. c to 21
00000000000000110000000000000000 5. Test
01001000000001000000000000000000 6. Add 18 to CI
00011000000000000000000000000000 7. 24 to CI
11101000000000100000000000000000 8. -23 to CI
01001000000000010000000000000000 9. Sub. 18
00101000000001100000000000000000 10. c to 20
00101000000000100000000000000000 11. -20 to c
11101000000001100000000000000000 12. c to 23
11001000000000000000000000000000 13. 19 to CI
11101000000000100000000000000000 14. -23 to c
00101000000001100000000000000000 15. c to 20
00101000000000100000000000000000 16. -20 to c
00000000000001110000000000000000 17. Stop
10000000000000000000000000000000 18. 1
11111111111111111111111111111111 19. -1
00000000000000000000000000000000 20. 0
11000001100000000000000000000000 21. 387
10100000000000000000000000000000 22. 5
00000000000000000000000000000000 23. 0
10110000000000000000000000000000 24. 13

View file

@ -0,0 +1,3 @@
for (var i = 2; i <= 8; i += 2) {
say i
}

View file

@ -0,0 +1,3 @@
for i in (2 .. (8, 2)) {
say i
}

View file

@ -0,0 +1,3 @@
2.to(8).by(2).each { |i|
say i
}

View file

@ -0,0 +1,3 @@
for i in 1.stride(to: 10, by: 2) {
print(i)
}

View file

@ -0,0 +1,3 @@
for var i = 1; i < 10; i += 2 {
print(i)
}

View file

@ -0,0 +1,5 @@
decl int i
for (set i 2) (< i 9) (set i (int (+ i 2)))
out i ", " console
end for
out "who do we appreciate?" endl console

View file

@ -0,0 +1,2 @@
for i 2 (i <= 8) (i <- i+2)
prn i

View file

@ -0,0 +1,4 @@
# If your version of jq does not have range/3, use this:
def range(m;n;step): range(0; ((n-m)/step) ) | m + (. * step);
range(2;9;2)

View file

@ -0,0 +1,3 @@
reduce range(2;9;2) as $i
(""; . + "\($i), ") +
"whom do we appreciate?"