langs a-z
This commit is contained in:
parent
db842d013d
commit
d066446780
11389 changed files with 98361 additions and 1020 deletions
8
Task/Integer-sequence/XPL0/integer-sequence.xpl0
Normal file
8
Task/Integer-sequence/XPL0/integer-sequence.xpl0
Normal file
|
|
@ -0,0 +1,8 @@
|
|||
\Displays integers up to 2^31-1 = 2,147,483,647
|
||||
code CrLf=9, IntOut=11;
|
||||
int N;
|
||||
[N:= 1;
|
||||
repeat IntOut(0, N); CrLf(0);
|
||||
N:= N+1;
|
||||
until N<0;
|
||||
]
|
||||
Loading…
Add table
Add a link
Reference in a new issue