//清空随机种子数
标记 start
Randomize
//得到 1~99999999 之间的一个随机数
x = Int((99999999 * Rnd) + 1)
//判断这个数字是否8位数字，如果不是8位数字，就重新生成
如果表达式 (x<10000000) 为真,则
跳转到标记 start
条件结束
输入文本 x