Добавил:

bekan Опубликованный материал нарушает ваши авторские права? Сообщите нам.

Вуз:

Нукусский филиал Ташкентского университета информационных технологий имени Мухаммада Ал-Хоразмий

Предмет:

Программирование на C++

Файл:

Laboratoriya jumısı_2

.doc

Скачиваний:

Добавлен:

10.09.2024

Размер:

360.96 Кб

Скачать

☆

Laboratoriya jumısı 2 S++ Builder 6 ortalıǵında tarmaqlanıwshı proсesslerge programma dúziw.

Pusk-programmı-Borland C++Builder 6.

File-New-Application tańlaymız(eger taza proekt jaratpaqshı bolsaq). Nátiyjede tómendegi ayna ashıladı.

File-Save Project As… tańlaymız nátiyjede tómendegi ayna ashıladı.

Work 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 2 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 z= ke ózgertemiz.

Komponentalar palitrasınan Standart vkladkasınan 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 z= 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:

Sol vkladkadan 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.

Sol vkladkadan Button knopkasın tańlap Form1 aynasına mısh penen tartıp qoyamız.

Button knopkasınıń atın ózgertiw ushın Object Inspector aynasınan Properties- Saption- Button dı Pusk sózine ózgertemiz.

Sol vkladkadan CheckBox knopkasın tańlap Form1 aynasına mısh penen tartıp qoyamız.

CheckBox knopkasınıń atın ózgertiw ushın Object Inspector aynasınan Properties- Saption- CheckBox dı Tazalaw sózine ózgertemiz.

Standart vkladkadan RadioGroup knopkasın tańlap Form1 aynasına mısh penen tartıp qoyamız.

RadioGroup knopkasınıń atın ózgertiw ushın Object Inspector aynasınan Properties- Saption- RadioGroup dı Tańlaw sózine ózgertemiz.

Object Inspector aynasınan Properties-Items-TString tańlaymız. Nátiyjede tómendegi ayna payda boladı oǵan 2x, x^2, x/3 lerdi jazamız. Kórinisi tómendegishe:

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="0,356";

Memo1->Clear();

Memo1->Lines->Add("Laboratornaya rabota 2");

RadioGroup1->ItemIndex = 0;

Soń Button(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.

double x,y,z,a,u;

a=StrToFloat(Edit1->Text);

z=StrToFloat(Edit2->Text);

if (z<1) x=z*z;

else x=z+1;

switch(RadioGroup1->ItemIndex){

case 0: {u=2*x; y=a*log(1+pow(x,1.0/5))+cos(u+1)*cos(u+1);};

Memo1->Lines->Add("u= "+FloatToStrF(u,ffFixed,8,6));

break;

case 1: {u=x*x; y=a*log(1+pow(x,1.0/5))+cos(u+1)*cos(u+1);};

Memo1->Lines->Add("u= "+FloatToStrF(u,ffFixed,8,6));

break;

case 2: {u=x/3; y=a*log(1+pow(x,1.0/5))+cos(u+1)*cos(u+1);};

Memo1->Lines->Add("u= "+FloatToStrF(u,ffFixed,8,6));

break;

}

Memo1->Lines->Add("y= "+FloatToStrF(y,ffFixed,8,6));

Form1 aynasına CheckBox belgilep Object Inspector aynasınan Events-Onclick ti 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.

if (CheckBox1->Checked){

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ı.