Мазмұны кіріспе 3 Қорытынды Пайдаланылған әдебиеттер кіріспе


Download 0.71 Mb.
bet2/2
Sana18.02.2023
Hajmi0.71 Mb.
#1210983
TuriПрограмма
1   2
Bog'liq
Kalmahan Zh

Do while циклі
Do while циклі while циклына өте ұқсас. Жалғыз айырмашылық - do while циклі орындалған кезде циклдің бір өтуі шартқа қарамастан орындалады.

Цикл


Label 1, Label 2, Label 3, Label 4, Edit 1, Edit 2, Edit 3,Edit 4, Memo 1, Button 1,
Button 2.
5-сурет.

6-сурет.

7-сурет. Функция.

8-сурет. Нәтижесі.
#include "math.h"
typedef double (*TFun)(double);
double fun1 (double);
double fun2 (double);
void Out_Rez(TFun , double, , double, , double, Tmemo*);
#include
#pragma hdrstop
#include "math.h"
#include "Unit2.h"
typedef double (*TFun)(double);
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
double fun1 (double);
double fun2 (double);
void Out_Rez(TFun ,double, double, double, TMemo*);
TForm2 *Form2;
//---------------------------------------------------------------------------
__fastcall TForm2::TForm2(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm2::Button1Click(TObject *Sender)
{
double a,b,h;
a=StrToFloat(Edit1->Text);
b=StrToFloat(Edit2->Text);
h=StrToFloat(Edit3->Text);
switch(RadioGroup1->ItemIndex){
case 0:Out_Rez (fun1,a,b,h,Memo1); break;
case 1:Out_Rez (fun2,a,b,h,Memo2); break;
} }
double fun1(double r) {
return 2*exp(r*r);
}
double fun2(double r) {
return pow(sin(r),2);
}
void Out_Rez(TFun f,double xn,double xk,double h,TMemo *mem) {
for(double x=xn; x<=xk; x+=h)
mem->Lines->Add("x="+FloatToStrF(x,ffFixed,8,2)+"y="+FloatToStrF(f(x),ffFixed,8,4));

}


//---------------------------------------------------------------------------
ҚОРЫТЫНДЫ

ПАЙДАЛАНЫЛҒАН ӘДЕБИЕТТЕР



  1. file:///C:/Users/BIB-516169/Downloads/C++%20Builder%206.%20%D0%9A%D0%BD%D0%B8%D0%B3%D0%B0%201.%20%D0%AF%D0%B7%D1%8B%D0%BA%20C++%20(%20PDFDrive%20).pdf

  2. http://codenet.ru/progr/bcb/borland_builder/3.php



Download 0.71 Mb.

Do'stlaringiz bilan baham:
1   2




Ma'lumotlar bazasi mualliflik huquqi bilan himoyalangan ©fayllar.org 2024
ma'muriyatiga murojaat qiling