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