5 lines
75 B
QBasic
5 lines
75 B
QBasic
10 X=RND(10000)
|
|
20 IF X>5000 PRINT "/";
|
|
30 IF X<5000 PRINT "\";
|
|
40 GOTO 10
|