运用了delphi 7.0 这是一个算法作业。虽然耗费比较大,但也提供了一个思路