8*除数<100，9*除数>100，显然，除数=12。
这样算式就简单了：
       ______8__0__9_____
  1  2)   9  7  0  9
       ___9__6___________
             1  0  9
       ______1__0__8_____
                   1

但我不知道咋写程序,用枚举太慢

程序？

我都给你解释到这一步了，你还编不出来？
枚举除数就可以了！！！
（接下来就是输出的格式了）
CLS
FOR i = 10 TO 99
    IF i * 8 < 100 AND i * 9 > 100 THEN
       k = i * 809 + 1
       PRINT TAB(11); 809
       PRINT TAB(5); "-----------------"
       PRINT i; ")"; SPC(4); k
       PRINT TAB(10); i * 8
       PRINT TAB(5); "-----------------"
       s = (k \ 100 - i * 8) * 100 + k MOD 100
       PRINT TAB(11); s
       PRINT TAB(11); i * 9
       PRINT TAB(5); "-----------------"
       PRINT TAB(13); 1
    END IF
NEXT i

根据条件得结果:
分析得条件:
1>  被除数 mod 809 = 1
2>  除数 * 8 的积是两位数,那除数的十位肯定是1
其实Mato已经分析得很不错的了.

谢谢两位老师,你们给我一种解决竖式问题的方法,暑假老师不好找,就只好请教两位老师,谢谢.