QBASIC编程实例18枚(运行于quickbasic情况中)。