9 lines
182 B
Text
9 lines
182 B
Text
include c:\cxpl\codes;
|
|
int N;
|
|
loop [N:= Ran(20);
|
|
IntOut(0, N);
|
|
if N=10 then quit;
|
|
ChOut(0, 9\tab\);
|
|
IntOut(0, Ran(20));
|
|
CrLf(0);
|
|
]
|