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

#include <vcl.h>
#pragma hdrstop

#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;

class classrod
{
        protected:
           float x, y;
        public:
           classrod():x(0), y(0){} // êîíñòðóêòîð íî óìîë÷àíèþ (x=0),(y=0)
           classrod(float ix, float iy):x(ix), y(iy){} // êîíñòðóêòîð ñ äâóìÿ ïåðåìåííûìè
           void seta(float ix){x=ix;} // ìåòîä ïðèñâîåíèå çíà÷åíèÿ ñòîðîíû x
           void setb(float iy){y=iy;} // ìåòîä ïðèñâîåíèå çíà÷åíèÿ ñòîðîíû y
           float geta(){return x;} // ìåòîä ïîëó÷åíèÿ çíà÷åíèÿ ñòîðîíû x
           float getb(){return y;} // ìåòîä ïîëó÷åíèÿ çíà÷åíèÿ ñòîðîíû y
};


class vesh: public classrod
{
        private:
           float z;
        public:
           vesh():classrod(),z(0){} // êîíñòðóêòîð íî óìîë÷àíèþ
           vesh(float xv,float yv,float zv):classrod(xv,yv),z(zv){}
           float vh(){return (geta()/z)+(getb()/z);}
};

//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Button1Click(TObject *Sender)
{
vesh v(StrToFloat(Edit1->Text), StrToFloat(Edit2->Text), StrToFloat(Edit3->Text));
Edit4->Text=FormatFloat("0.00",v.vh());
}
//---------------------------------------------------------------------------