信息系統(tǒng)開發(fā)與維護(hù)(專科)章節(jié)練習(xí)(2019.05.10)

求方程ax²+bx+c=0的根。其中abc由鍵盤輸入，設(shè)b²-4ac>0

在窗體上畫一個標(biāo)簽（名稱為Label1）和一個時鐘組件（名稱為Timer1），添加2個按鈕“開始”（Button1）和“停止”（Button2）。程序運(yùn)行后，單擊窗體“開始”按鈕，時鐘組件啟動，并開始在標(biāo)簽中更新顯示當(dāng)前時間，每隔1秒鐘變換一次，按停止按鈕停止計時。（見圖）。請?zhí)羁?#65377;

然后編寫如下幾個事件過程: 
procedure TForm1.FormCreate(Sender: TObject); 
begin 
  Timer1.Enabled :=（①） ;   
    Timer1.Interval  := （②） ; 
end;  
procedure TForm1.Button1Click(Sender: TObject); begin 
  Timer1.Enabled := （③） ; 
end;  
procedure TForm1.Button2Click(Sender: TObject); begin
    Timer1.Enabled :=  （④）; 
end;  
procedure TForm1.Timer1Timer(Sender: TObject); begin 
    label1.Caption  :=  TimeToStr（⑤）; 
end;