«Бағдарламалау тілдері» пәнінен оқу тәжірибесі бойынша



бет26/44
Дата03.10.2023
өлшемі2,7 Mb.
#183587
1   ...   22   23   24   25   26   27   28   29   ...   44
Байланысты:
«Бағдарламалау тілдері» пәнінен тәжірибелік жұмыстар жинағы

for(int i=0;i{ max=a[i]; int Nmax=i;
for(int j=i;jif (a[j]>max) {max=a[j]; Nmax=j;}
a[Nmax]=a[i]; a[i]=max;
Memo2->Lines->Add("a["+Int
ToStr(i)+"]= "+FloatToStrF(max,ffFixed,5,2)); }
}
//------Массивті толтыру батырмасының коды-----------
void __fastcall TForm1::Button2Click(TObject *Sender)
{
if (Edit1->Text=="")
{ShowMessage("Massiv elementterinin sanin beriniz");
Edit1->SetFocus();}
Elem_sani=StrToInt (Edit1->Text);
for(int i=0; i{ a[i]= (float) random(100)/7-3;
Memo1->Lines->Add("a["+IntToStr(i)+"]=
"+FloatToStrF(a[i],ffGeneral,3,1));}
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormActivate(TObject *Sender)
{Edit1->SetFocus();}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button4Click(TObject *Sender)
{Form1->Close();}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button3Click(TObject *Sender)
{Memo1->Clear(); Memo2->Clear();
Edit1->Clear(); Edit2->Clear(); Edit3->Clear();}
//---------------------------------------------------------------------------


2- деңгей

2. Студенттер туралы мәліметтер (фамилиясы, аты және туған жылы) класс түрінде анықталған. Группадағы студенттер туралы мәліметтерді сұрыптауды (фамилиясын немесе


атын алфавит бойынша, туған жылдарын кему реті бойынша орналастыру) орындайтын программа жазыңыз. Программа терезесі 2.2.2- суретте көрсетілген.



3.2.2-сурет. Студенттер туралы мәліметтер

Терезедегі компоненттер қасиеттерінің және оқиғаларының мәндері:






Программаның мәтіні:
#include "Unit1.h"
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;


Достарыңызбен бөлісу:
1   ...   22   23   24   25   26   27   28   29   ...   44




©engime.org 2024
әкімшілігінің қараңыз

    Басты бет