用excel函数快速实现体能测试成绩统计

eratorTester;РbeginРResult := TOperatorTester.Create; Result.fdata := -right.fdata;Рend;Рclass operator TOperatorTester.equal (left, right:РTOperatorTester) : boolean;РbeginРresult :=Рend;Рend.Р//主程序Р(left.data = right.data) ;Рprogram OperatorTest;Р{$APPTYPE CONSOLE}РusesРSysUtils,Рoperatorclass in 'operatorclass.pas';РvarРa, b, c: TOperatorTester;Рd: string;Рe: integer;РbeginРwriteln (' 操作符重载测试:') ;Рa := TOperatorTester.Create; b := TOperatorTester.Create; c := TOperatorTester.Create; a.data := 101;Р[ 1] Marco Cantu'. Mastering Borland Delphi 2005. Sybex Press,Р2005.Р[2] 杨盛泉,刘白林. Delphi 2007 程序设计教程. 清华大学出版社,2010.Р[ 3] Lippman, Stanley B./ Lajoie, Josee/ Moo, Barbara E. C ++ Primer. addison-wesley,2005.Р[ 4] Schildt, H. C# 2.0: plete Reference Second Edition.РMcGraw-Hill Osbome Media,2005.