#include #include #pragma hdrstop #include “Unit15. h”

//-------------------------------------------------------------------
#include
#include
#pragma hdrstop
#include “Unit15.h”
//-------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource “*.dfm”
Tform1 *Form1;
//-------------------------------------------------------------------
__fastcall Tform1::Tform1(Tcomponent* Owner)
: Tform(Owner)
{
}
//-------------------------------------------------------------------
void __fastcall Tform1::Button1Click(Tobject *Sender)
{
float x,y;
x = StrToFloat(Edit1->Text);
if x>0 {
RadioGroup1->ItemIndex = 0;
y =x*x*x;
label3->Caption=(“y=”+floattostr(y)) }
if x<0 {
RadioGroup1->ItemIndex = 1;
y=x*x;
label3->Caption=(“y=”+floattostr(y))}
if x=0 {
RadioGroup1->ItemIndex = 2;
y= x;
label3->Caption=(“y=”+floattostr(y))}
getch(); Return 0 }