新编迷宫图

贵州 程欣宇
1994-01-14

        20 FOR Y=0 TO 22:FOR X=1 TO 26STEP2:IF RND(9)>3 THEN 40
        30 A=Y MOD2:LOCATE X-A,Y:PRINT (HR$(227-A)
        40 NEXT:NEXT:PAUSE
        运行环境:F-BASIC
 
 