10 X=RND(10000)
20 IF X>5000 PRINT "/";
30 IF X<5000 PRINT "\";
40 GOTO 10