Добавил:
sergey123
Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз:
Предмет:
Файл:
//---------------------------------------------------------------------------
#ifndef Unit1H
#define Unit1H
//---------------------------------------------------------------------------
#include <System.Classes.hpp>
#include <Vcl.Controls.hpp>
#include <Vcl.StdCtrls.hpp>
#include <Vcl.Forms.hpp>
#include <string>
#include <cmath>
using namespace std;
//---------------------------------------------------------------------------
class TForm1 : public TForm
{
__published: // IDE-managed Components
TEdit *Edit1;
TButton *Button1;
TButton *Button2;
TButton *Button3;
TButton *Button4;
TButton *Button5;
TButton *Button6;
TButton *Button7;
TButton *Button8;
TButton *Button9;
TButton *Button10;
TButton *Button11;
TButton *Button12;
TButton *Button13;
TButton *Button14;
TButton *Button15;
TButton *Button16;
TButton *Button17;
void __fastcall Button13Click(TObject *Sender);
void __fastcall Button16Click(TObject *Sender);
void __fastcall Button14Click(TObject *Sender);
void __fastcall Button15Click(TObject *Sender);
void __fastcall Button17Click(TObject *Sender);
private: // User declarations
public: // User declarations
bool isfractal, isstart;
int op;
float a, b;
String result;
__fastcall TForm1(TComponent* Owner);
};
int round(double number)
{
return (number >= 0) ? (int)(number + 0.5) : (int)(number - 0.5);
}
String compute(float a, float b, int op) {
switch (op) {
case 1:
return FloatToStr(round((a+b)*1000)/1000.0);
break;
case 2:
return FloatToStr(round((a-b)*1000)/1000.0);
break;
case 3:
return FloatToStr(round((a*b)*1000)/1000.0);
break;
case 4:
if (b == 0) {
return "Деление на нуль невозможно";
}
else {
return FloatToStr(round((a/b)*1000)/1000.0);
break;
}
default:
;
}
}
//---------------------------------------------------------------------------
extern PACKAGE TForm1 *Form1;
//---------------------------------------------------------------------------
#endif