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

#include <vcl.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)
{
float cislo1 = StrToInt(Edit1->Text);       // nacteni prniho cisla
float cislo2 = StrToInt(Edit2->Text);       // nacteni druheho cisla
float vysledek = cislo1 + cislo2;           // soucet
Label3->Caption = "" ;                 
Label3->Caption = "+" ;                 // znamenko
Label1->Caption = vysledek;               // vypis

}
//---------------------------------------------------------------------------

void __fastcall TForm1::Button2Click(TObject *Sender)
{
int i=0;
int b=0;
float cislo1 = StrToInt(Edit1->Text);       // nacteni prniho cisla
float cislo2 = StrToInt(Edit2->Text);       // nacteni druheho cisla
float vysledek = cislo1 - cislo2;           // rozdil
Label3->Caption = "-" ;                 // znamenko
Label1->Caption = vysledek;               // vypis
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button3Click(TObject *Sender)
{
int i=0;
int b=0;
float cislo1 = StrToInt(Edit1->Text);       // nacteni prniho cisla
float cislo2 = StrToInt(Edit2->Text);       // nacteni druheho cisla
float vysledek = cislo1 * cislo2;           // soucin
Label3->Caption = "x" ;                 // znamenko
Label1->Caption = vysledek;               // vypis
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button4Click(TObject *Sender)
{
int i=0;
int b=0;
float cislo1 = StrToInt(Edit1->Text);       // nacteni prniho cisla
float cislo2 = StrToInt(Edit2->Text);       // nacteni druheho cisla
float vysledek = cislo1 / cislo2;           // podil
Label3->Caption = "/" ;                 // znamenko
Label1->Caption = vysledek;               // vypis
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button5Click(TObject *Sender)
{
int a=0;
int b=0;
float cislo1 = StrToInt(Edit1->Text);       // nacteni  cisla
int mocnina = StrToInt(Edit2->Text);       // nacteni mocniny
float vysledek = 1;                        //  deklarovani promene
for (int i = 0; i < mocnina; i++) {
         vysledek = vysledek * cislo1;      // cyklus
        };
Label3->Caption = "^" ;                     // vypis
Label1->Caption = vysledek;
}
//---------------------------------------------------------------------------
