【问题】 本程序设计界面如下图所示:procedure TForm1.Button1Click(Sender: TObject); //“计算”按钮vari , n, sum : integer ;beginsum := 0 ;i := 1 ;n := StrToInt(edit1.Text); //读入正整数nwhile i <=n do //循环语句begin if odd( i ) then sum :=sum+i; i := i +1 ;end; edit2.Text :=IntToStr(
本程序设计界面如下图所示:procedure TForm1.Button1Click(Sender: TObject); //“计算”按钮vari , n, sum : integer ;beginsum := 0 ;i := 1 ;n := StrToInt(edit1.Text); //读入正整数nwhile i <=n do //循环语句begin if odd( i ) then sum :=sum+i; i := i +1 ;end; edit2.Text :=IntToStr( sum ); //将结果在编辑框中显示end;用户在edit1中输入一个正整数7,则在edit2中显示计算结果为: A、7B、14C、16D、21
正确答案:C
题目解析:本题出自国家开放大学,国家开放大学Delphi程序设计,由丰阳塔题库搜集整理。