Delphi 计算1到10之间的奇数和【源码】.rar

时间:2022-07-30 06:34:43
【文件属性】:

文件名称:Delphi 计算1到10之间的奇数和【源码】.rar

文件大小:6KB

文件格式:RAR

更新时间:2022-07-30 06:34:43

Delphi源码-界面编程

Delphi 推荐到奇数,并计算1到10之间的奇数求和,这是个简单的数学问题,数学水平高,写出这种小程序并不难,趁机把代码帖出来吧:   procedure TForm1.Button1Click(Sender: TObject);   var    i,j:integer;   begin    j:=0;    For i := 1 to 10 do    begin    if i mod 2 =0 then    Continue;    j := j i;    Edit1.text := IntToStr(j);    end;   end;


【文件预览】:
srcfans.com
----计算1到10之间的奇数和()
--------Unit1.ddp(51B)
--------Project1.res(876B)
--------Unit1.dcu(4KB)
--------Unit1.dfm(774B)
--------Project1.cfg(434B)
--------Project1.dpr(188B)
--------Project1.dof(2KB)
--------Unit1.pas(645B)

网友评论