Data update
This commit is contained in:
parent
5150844a7d
commit
4bb20c9b71
7735 changed files with 38060 additions and 199180 deletions
|
|
@ -1,3 +0,0 @@
|
|||
for I in reverse 0..10 loop
|
||||
Put_Line(Integer'Image(I));
|
||||
end loop;
|
||||
|
|
@ -1,14 +0,0 @@
|
|||
identification division.
|
||||
program-id. countdown.
|
||||
environment division.
|
||||
data division.
|
||||
working-storage section.
|
||||
01 counter pic 99.
|
||||
88 counter-done value 0.
|
||||
01 counter-disp pic Z9.
|
||||
procedure division.
|
||||
perform with test after varying counter from 10 by -1 until counter-done
|
||||
move counter to counter-disp
|
||||
display counter-disp
|
||||
end-perform
|
||||
stop run.
|
||||
|
|
@ -1,2 +0,0 @@
|
|||
for i in 1..10 by -1 do
|
||||
writeln(i);
|
||||
|
|
@ -1,2 +0,0 @@
|
|||
var r = 1..10;
|
||||
for i in r by -1 do { ... }
|
||||
|
|
@ -1,3 +0,0 @@
|
|||
for i = 10 to 0 by -1 do
|
||||
? i
|
||||
end for
|
||||
|
|
@ -1,22 +0,0 @@
|
|||
class Step {
|
||||
var end:Int;
|
||||
var step:Int;
|
||||
var index:Int;
|
||||
|
||||
public inline function new(start:Int, end:Int, step:Int) {
|
||||
this.index = start;
|
||||
this.end = end;
|
||||
this.step = step;
|
||||
}
|
||||
|
||||
public inline function hasNext() return step > 0 ? end >= index : index >= end;
|
||||
public inline function next() return (index += step) - step;
|
||||
}
|
||||
|
||||
class Main {
|
||||
static function main() {
|
||||
for (i in new Step(10, 0, -1)) {
|
||||
Sys.print('$i ');
|
||||
}
|
||||
}
|
||||
}
|
||||
|
|
@ -1,3 +0,0 @@
|
|||
for ($i = 10; $i -ge 0; $i--) {
|
||||
$i
|
||||
}
|
||||
|
|
@ -1 +0,0 @@
|
|||
10..0
|
||||
|
|
@ -1 +0,0 @@
|
|||
for i 10 0 -1 [print i]
|
||||
Loading…
Add table
Add a link
Reference in a new issue