Створено процедуру обробки події OnClick для кнопки Button1.
procedure TForm1.Button1Click(Sender: TObject);
var a: Integer;
begin
a:=StrToInt(Edit1.Text);
if RadioButton1.Checked Then c:=a*2
Else if RadioButton2.Checked Then c:=a+5
Else if RadioButton3.Checked Then c:=a-10
Else c:=a *a;
Edit2.Text := IntToStr(c)
end;
У поле Edit1 уведене значення a =11.
var a: Integer;
begin
a:=StrToInt(Edit1.Text);
if RadioButton1.Checked Then c:=a*2
Else if RadioButton2.Checked Then c:=a+5
Else if RadioButton3.Checked Then c:=a-10
Else c:=a *a;
Edit2.Text := IntToStr(c)
end;
У поле Edit1 уведене значення a =11.
З'ясуй, яке число виведе в поле Edit2 програма, якщо вибрано радіокнопку RadioButton4.
Запиши відповідь:
Ви повинні авторизуватися, щоб відповісти на завдання. Будь ласка, увійдіть в свій профіль на сайті або зареєструйтеся.