Тема:Циклічні програми з регулярною зміною аргумента, які містять розгалуження

1. Розв’язок програми мовою C++

2. Код програми.

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

#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)

{

float b,x,a=5.5,c=2.8,y=28.3,z=4.21;

Memo1->Clear();

Memo1->Lines->Append("X\tB");

for (x=3.4;x<=6.6;x+=0.11)

{

b=5*(y-x)*(sqrt(y-z*x)/(1+(y+(x*x))*log(z)));

if(b<a&&b>c) Memo1->Lines->Append(FloatToStrF(x,ffFixed,3,3)+'\t'+FloatToStrF(b,ffFixed,3,3));

}

}

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