September 2017 Update
This commit is contained in:
parent
bba7bfd280
commit
ba8067c3b7
14570 changed files with 153136 additions and 63871 deletions
|
|
@ -1,5 +1,6 @@
|
|||
10 FOR i=1 TO 10
|
||||
20 PRINT i;
|
||||
30 IF i=10 THEN GOTO 50
|
||||
10 LET I=1
|
||||
20 PRINT I;
|
||||
30 IF I=10 THEN GOTO 70
|
||||
40 PRINT ", ";
|
||||
50 NEXT i
|
||||
50 LET I=I+1
|
||||
60 GOTO 20
|
||||
|
|
|
|||
|
|
@ -0,0 +1,5 @@
|
|||
10 FOR i=1 TO 10
|
||||
20 PRINT i;
|
||||
30 IF i=10 THEN GOTO 50
|
||||
40 PRINT ", ";
|
||||
50 NEXT i
|
||||
8
Task/Loops-N-plus-one-half/Bc/loops-n-plus-one-half.bc
Normal file
8
Task/Loops-N-plus-one-half/Bc/loops-n-plus-one-half.bc
Normal file
|
|
@ -0,0 +1,8 @@
|
|||
while (1) {
|
||||
print ++i
|
||||
if (i == 10) {
|
||||
print "\n"
|
||||
break
|
||||
}
|
||||
print ", "
|
||||
}
|
||||
|
|
@ -0,0 +1,41 @@
|
|||
[ N and a half times loop
|
||||
=======================
|
||||
|
||||
A program for the EDSAC
|
||||
|
||||
Works with Initial Orders 2 ]
|
||||
|
||||
T56K
|
||||
GK
|
||||
|
||||
O16@
|
||||
[ 1 ] T24@
|
||||
A25@
|
||||
A18@
|
||||
U25@
|
||||
S23@
|
||||
E11@
|
||||
|
||||
O25@
|
||||
O19@
|
||||
O20@
|
||||
G1@
|
||||
|
||||
[ 11 ] O18@
|
||||
O17@
|
||||
O21@
|
||||
O22@
|
||||
ZF
|
||||
|
||||
[ 16 ] #F
|
||||
[ 17 ] PF
|
||||
[ 18 ] QF
|
||||
[ 19 ] NF
|
||||
[ 20 ] !F
|
||||
[ 21 ] @F
|
||||
[ 22 ] &F
|
||||
[ 23 ] JF
|
||||
[ 24 ] PF
|
||||
[ 25 ] PF
|
||||
|
||||
EZPF
|
||||
|
|
@ -0,0 +1,7 @@
|
|||
for value = 1 to 10
|
||||
formiddle
|
||||
>> value
|
||||
>> ", "
|
||||
end
|
||||
forlast: > value
|
||||
end
|
||||
|
|
@ -0,0 +1,9 @@
|
|||
Public Sub Main()
|
||||
Dim siLoop As Short
|
||||
|
||||
For siLoop = 1 To 10
|
||||
Print siLoop;
|
||||
If siLoop <> 10 Then Print ", ";
|
||||
Next
|
||||
|
||||
End
|
||||
|
|
@ -0,0 +1,5 @@
|
|||
var out = System.out
|
||||
for(i in 1..10) {
|
||||
if(i > 1) out.print(", ")
|
||||
out.print(i)
|
||||
}
|
||||
|
|
@ -0,0 +1,7 @@
|
|||
U8 i, max = 10;
|
||||
for (i = 1; i <= max; i++) {
|
||||
Print("%d", i);
|
||||
if (i == max) break;
|
||||
Print(", ");
|
||||
}
|
||||
Print("\n");
|
||||
|
|
@ -0,0 +1,8 @@
|
|||
// version 1.0.6
|
||||
|
||||
fun main(args: Array<String>) {
|
||||
for (i in 1 .. 10) {
|
||||
print(i)
|
||||
if (i < 10) print(", ")
|
||||
}
|
||||
}
|
||||
|
|
@ -1 +0,0 @@
|
|||
<@ FORLITLIT>10|<@ SAYPOSFOR>...</@><@ ABF>,</@></@>
|
||||
|
|
@ -0,0 +1,5 @@
|
|||
fn main() {
|
||||
for i in 1..11 {
|
||||
print!("{}{}", i, if i == 10 {"\n"} else {", "});
|
||||
}
|
||||
}
|
||||
|
|
@ -0,0 +1,4 @@
|
|||
1 to: 10 do: [:n |
|
||||
Transcript show: n asString.
|
||||
n < 10 ifTrue: [ Transcript show: ', ' ]
|
||||
]
|
||||
|
|
@ -0,0 +1,9 @@
|
|||
forv i=1/10 {
|
||||
di `i' _continue
|
||||
if `i'<10 {
|
||||
di ", " _continue
|
||||
}
|
||||
else {
|
||||
di
|
||||
}
|
||||
}
|
||||
|
|
@ -0,0 +1,10 @@
|
|||
mata
|
||||
for (i=1; i<=10; i++) {
|
||||
printf("%f",i)
|
||||
if (i<10) {
|
||||
printf(", ")
|
||||
} else {
|
||||
printf("\n")
|
||||
}
|
||||
}
|
||||
end
|
||||
|
|
@ -0,0 +1 @@
|
|||
foreach n in ([1..10]){ print(n); if (n!=10) print(",") }
|
||||
|
|
@ -0,0 +1 @@
|
|||
[1..10].pump(Console.print, Void.Drop, T(Void.Write,",",Void.Drop));
|
||||
|
|
@ -0,0 +1 @@
|
|||
[1..10].pump(Console.print, Void.Drop, fcn(n){ String(",",n) });
|
||||
Loading…
Add table
Add a link
Reference in a new issue