这是我学习pascal的时候写的一个程序为了使用矩阵很文件做了很多优化