Laboratoriya jumısı_3
.docLaboratoriya jumısı 3 S++ Builder 6 ortalıǵında cikllı proсesslerge programma dúziw.
Pusk-programmı-Borland C++Builder 6. Nátiyjede tómendegishe taza Project 1 ayna ashıladı.
File-Save Project As… tańlaymız nátiyjede tómendegi ayna ashıladı.
Work 3 papka jaratıp sonıń ishine saqlaymız.
Komponentalar palitrasınan Standart vkladkasın tańlaymız.
Label knopkasın
tańlap Form1
aynasına mısh penen tartıp qoyamız. Bul proсessti 4 márte
qaytalaymız.
Label1 sózin ózgertiw ushın Object Inspector aynasınan Properties-Saption-Label1 di a= qa ózgertemiz.
Object Inspector aynasınan
Properties –Font -
mıshtı shertip shriftti ózgertemiz.
(18) OK túymesin
basamız.
Label2 sózin ózgertiw ushın Object Inspector aynasınan Properties-Saption-Label2 di b= ke ózgertemiz.
Label1 sózin ózgertiw ushın Object Inspector aynasınan Properties-Saption-Label1 di n= qa ózgertemiz.
Label1 sózin ózgertiw ushın Object Inspector aynasınan Properties-Saption-Label1 di h= qa ózgertemiz.
Endi
Edit
knopkasın tańlaymız.
Onı Label1 yaǵnıy a= knopkasınıń qasına oń jaǵına qoyamız.
Label2 yaǵnıy b= knopkasınıń qasına oń jaǵına qoyamız.
Label3 yaǵnıy n= knopkasınıń qasına oń jaǵına qoyamız.
Label4 yaǵnıy h= knopkasınıń qasına oń jaǵına qoyamız.
Edit sózlerin joq etiw ushın Object Inspector aynasınan Properties-Text-Edit1 den Edit1 sózin óshiremiz. Nátiyjede ayna kórnisi tómendegishe:
Endi
Memo
knopkasın tańlap Form1
aynasına mısh penen tartıp qoyamız.
Object Inspector aynasınan Properties –Scrollbars-ssVertical tańlaymız. Aynamızdıń kórinisi tómendegishe kóriniske iye keledi.
Memo sózin joq etiw ushın Object Inspector aynasınan Properties-Lines-String nan Memo1 di óshiremiz.
Endi
Button1
knopkasın tańlap Form1
aynasına mısh penen tartıp qoyamız.
Button2 knopkasın tańlap Form1 aynasına mısh penen tartıp qoyamız.
Button1 knopkasınıń atın ózgertiw ushın Object Inspector aynasınan Properties- Saption- Button1 dı Pusk sózine ózgertemiz.
Button2 knopkasınıń atın ózgertiw ushın Object Inspector aynasınan Properties- Saption- Button2 dı Memo ni tazala sózine ózgertemiz.
Form1 aynasında turıp mıshtı eki ret shertemiz, Nátiyjede Unit1.cpp aynasında mına kórinistegi kod payda boladı.Sonıń ishine tómendegilerdi jazamız:
Edit1->Text="0,1"; Edit2->Text="1,0";
Edit3->Text="10"; Edit4->Text="0,2";
Memo1->Lines->Add("Laboratoriya jumısı 3");
Soń Button1(Pusk) knopkasın eki márte shertemiz. Nátiyjede Code Editor(Redaktor koda) yaǵnıy Unit1.cpp aynasında tómendegishe kod payda boladı. Onıń ishine tómendegilerdi jazamız.
float a, b, x, h, r, s;
int n, zn = -1, k;
a = StrToFloat(Edit1->Text);
b = StrToFloat(Edit2->Text);
n = StrToInt(Edit3->Text);
h = StrToFloat(Edit4->Text);
for(x = a; x<=b; x+=h) {
r = s = 1;
for(k = 1; k<=n; k++) {
r = zn*r*x/k;
s+=r;
}
Memo1->Lines->Add("pri x= "+FloatToStrF(x,ffFixed,8,2)
+" summa= "+FloatToStrF(s,ffFixed,8,5));
}
Jáne Button2(Memo ni tazala) knopkasın eki márte shertemiz. Nátiyjede Code Editor(Redaktor koda) yaǵnıy Unit1.cpp aynasında kod payda boladı. Onıń ishine tómendegini jazamız.
Memo1->Clear();
Hámmesin kiritip jazıp bolǵannan keyin Project menyusinen Compile Unit yamasa(alt +F9) tańlaymız.
Eger xammesi tuwrı bolsa onda dastur tómendegi aynanı shıǵaradı.
Aqırında Run
menyusinen Run dı
yamasa F9
tańlaymız(Instrumentler panelinen mına
piktogrammanı basamız. Mına ayna payda boladı. Pusk
túymesin basamız. Nátiyjede mınanı
esaplap beredi.
Máseleniń berilgeni: Berilgen n de h adım menen hám [a, b] aralıǵında x agrumenti ózgerip turatuǵın S(x) funkсiyasınıń barlıq mánislerin shıǵarıwshı programma dúziń hám sazlań.
Matematicheskaya funkсiya |
ID funkсii |
Matematicheskaya funkсiya |
ID funkсii |
|
sqrt(x) |
arcsin(x) |
asin(x) |
|x| |
fabs(x) |
arctg(x) |
atan(x) |
ex |
exp(x) |
arctg(x/y) |
atan2(x,y) |
xy |
pow(x, y) |
sh(x)=1/2 (ex-e-x) |
sinh(x) |
ln(x) |
log(x) |
ch(x)=1/2 (ex+e-x) |
cosh(x) |
lg10(x) |
log10(x) |
tgh(x) |
tanh(x) |
sin(x) |
sin(x) |
Ostatok ot deleniya x na y |
fmod(x,y) |
cos(x) |
cos(x) |
Okruglenie k bolshemu |
ceil(x) |
tg(x) |
tan(x) |
Okruglenie k menshemu |
floor(x) |
2-Mısal( óz betinshe tapsırma)
3.1 Berilgen h adım menen hám [a, b] aralıǵında x agrumenti ózgerip turatuǵın Y(x) funkсiyasınıń, S(x) summasınıń hám |Y(x)–S(x)| ayırmasınıń barlıq mánislerin tabliсa kórinisinde shıǵarıń.
a, b, h hám n mánislerin klaviaturadan kiritiń. S(x) summası Y(x) funkсiyasınıń qatarǵa jayılması bolǵanlıqtan máseleni durıs sheshkende S hám Y mánisleri birneshe qanalarǵa shekem sáykes keliwi tiyis. Programma jumısın a = 0,1; b = 1,0; h = 0,1; mánisleri ushın tekseriń. Parametr n mánisin tapsırmaǵa baylanıslı saylap alıń
void __fastcall TForm1::FormCreate(TObject *Sender)
{
Edit1->Text="0,1"; Edit2->Text="1,0";
Edit3->Text="10"; Edit4->Text="0,1";
Memo1->Lines->Add("Laboratoriya jumısı 3.1");
}
void __fastcall TForm1::Button1Click(TObject *Sender)
{
float a, b, x, h, r, s;
int n, zn = -1, k;
a = StrToFloat(Edit1->Text);
b = StrToFloat(Edit2->Text);
n = StrToInt(Edit3->Text);
h = StrToFloat(Edit4->Text);
for(x = a; x<=b; x+=h) {
r = s = x;
for(k = 1; k<=n; k++) {
r = zn*r*pow(x,2)/(2*k*(2*k+1));
s+=r;
}
Memo1->Lines->Add("pri x= "+FloatToStrF(x,ffFixed,8,2)
+" summa= "+FloatToStr(s)
+ " y= "+FloatToStr(sin(x))
+" |y(x)-s(x)|= "+FloatToStrF(fabs(sin(x)-s),ffFixed,12,10));
}
}
void __fastcall TForm1::Button2Click(TObject *Sender)
{
Memo1->Clear();
}
Óz betinshe tapsırmalar
1.
.
2.
.
3.
.
4.
.
5.
.
6.
, 
.
7.
, 
.
8.
, 
.
9.
, 
.
10.
, 
.
11.
, 
.
12.
, 
.
13.
, 
.
14.
, 
.
15.
.