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);
]