用delphi 求1+2+3+.+N的和,该怎么处理
用delphi 求1+2+3+...+N的和
用delphi 求1+2+3+...+N的和
呵呵~~~~~帮忙写下``~~~
------解决方案--------------------
用delphi 求1+2+3+...+N的和
呵呵~~~~~帮忙写下``~~~
------解决方案--------------------
- Delphi(Pascal) code
function(eof:integer):integer; var sum:integer i:intege; begin sum:=0; for i:=1 to eof do begin sum:=sum+i; end; result:=sum; end;