1. Есептің блок-схемасын құрамыз:

басы

a,b,h

S=(a+b)*h/2

S

соңы

2. С++ Builder ортасын ашып, 1 Label 4Edit 2 Button пайдаландым.

Компонент	Қасиеттері	Мәні
Form1	BorderStyle	bsSizeable
	Caption	Form1
	Width	379
	Height	194

3. Орындау кнопкасына төмендегі программаны енгіздім.

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

#include <vcl.h>

#include <math.h>

#pragma hdrstop

#include "Unit1.h"

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

#pragma package(smart_init)

#pragma resource "*.dfm"

TForm1 *Form1;

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

__fastcall TForm1::TForm1(TComponent* Owner)

: TForm(Owner)

{

}

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

void __fastcall TForm1::Button1Click(TObject *Sender)

{

int a,b,h;

float S;

a=StrToInt(Edit1->Text);

b=StrToInt(Edit2->Text);

h=StrToInt(Edit3->Text);

S=(a+b)*h/2;

Edit4->Text=FloatToStr(S);

}

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

void __fastcall TForm1::Button2Click(TObject *Sender)

{

Edit1->Clear();

Edit2->Clear();

Edit3->Clear();

Edit4->Clear();

}

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

4. Тазалау кнопкасына төмендегі программаны енгіздім.

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

#include <vcl.h>

#include <math.h>

#pragma hdrstop

#include "Unit1.h"

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

#pragma package(smart_init)

#pragma resource "*.dfm"

TForm1 *Form1;

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

__fastcall TForm1::TForm1(TComponent* Owner)

: TForm(Owner)

{

}

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

void __fastcall TForm1::Button1Click(TObject *Sender)

{

int a,b,h;

float S;

a=StrToInt(Edit1->Text);

b=StrToInt(Edit2->Text);

h=StrToInt(Edit3->Text);

S=(a+b)*h/2;

Edit4->Text=FloatToStr(S);

}

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

void __fastcall TForm1::Button2Click(TObject *Sender)

{

Edit1->Clear();

Edit2->Clear();

Edit3->Clear();

Edit4->Clear();

}

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

void __fastcall TForm1::FormCreate(TObject *Sender)

{

}

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

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

Абрамов бойынша: а,б,с енгізіп х1,х2 іздеу.

1.С++ Builder ортасын ашып, 1 Label 4Edit 2 Button пайдаландым.

Компонент	Қасиеттері	Мәні
Form1	BorderStyle	bsSizeable
	Caption	Form1
	Width	322
	Height	288