【问题】 在“盘数量”（Edit1）框中输入购买的光盘数，单击“计算”（Button1）按钮后在“应收金额”（Edit2）框中显示应收钱数。单击“结束”（Button2）按钮结束程序。单击“计算”（Button1）按钮的事件处理程序如下：procedure TForm1.Button1Click(Sender: TObject);var Disk, Money: Integer;begin Disk := StrToInt(Edit1.Text); if Disk >= 50 then Money := 2 *

在“盘数量”（Edit1）框中输入购买的光盘数，单击“计算”（Button1）按钮后在“应收金额”（Edit2）框中显示应收钱数。单击“结束”（Button2）按钮结束程序。单击“计算”（Button1）按钮的事件处理程序如下：procedure TForm1.Button1Click(Sender: TObject);var Disk, Money: Integer;begin Disk := StrToInt(Edit1.Text); if Disk >= 50 then Money := 2 * Disk else Money := 3 * Disk; Edit2.Text := IntToStr(Money);end;procedure TForm1.Button2Click(Sender: TObject);begin Close;end;当用户在Edit1（盘数量）中输入数量值25，然后按“确定”按钮，在Edit2（应收金额）显示结果为 。A、75B、50C、150D、35

点击查看正确答案