为《Delphi 常用数值算法集》全书的源代码。