Void __fastcall tForm1::Button1Click(tObject *Sender)

{

int a,b,c,R,v,x;

a=StrToInt(Edit1->Text);

b=StrToInt(Edit2->Text);

c=StrToInt(Edit3->Text);

R=StrToInt(Edit4->Text);

x=StrToInt(Edit5->Text);

if(ComboBox1->ItemIndex==0)

v=a*sin(x)+c;

if(ComboBox1->ItemIndex==1)

v=R*R;

if(ComboBox1->ItemIndex==2)

v=abs(a+b*x);

Edit6->Text=IntToStr(v);

}

//---------------------------------------------------------------------------

Void __fastcall tForm1::Button2Click(tObject *Sender)

{

Edit1->Clear();

Edit2->Clear();

Edit3->Clear();

Edit4->Clear();

Edit5->Clear();

Edit6->Clear();

}

//---------------------------------------------------------------------------

4.Программа нәтижесі.