Dastur kodi
int A[26]; // massiv
//---------------------------------------------------------------------------
void __fastcall TForm1::FormCreate(TObject *Sender)
{
for(int i = 0; i<26; i++)
{
A[i] = 0;
}
A[0] = 1;
A[1] = 1; // massivni initsalizatsiya qilish
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
if(A[25] == 0)
{
int A1[26];
AnsiString s = "";
int i = 1;
A1[0] = 1;
while(A[i] != 0)
{
A1[i] = A[i] + A[i-1];
i++;
}
A1[i] = 1;
for(int j = 0; j <= i; j++)
{
A[j] = A1[j];
s = s + IntToStr(A[j]) + ' ';
}
Memo1->Lines->Add(s);
}
} //asosiy protsedura
//---------------------------------------------------------------------------
void __fastcall TForm1::Button2Click(TObject *Sender)
{
if(Button2->Caption == "Pusk")
{
Button2->Caption = "Pauza";
}
else
{
Button2->Caption = "Pusk";
} // taymerni aktivlashtirish
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Timer1Timer(TObject *Sender)
{
if(Button2->Caption == "Pauza") //aktivlikka tekshirish
{
Button1->Click(); // asosiy protsedurani chaqirish
}
}
Nazorat savollari
1)Massiv deganda nima tusiniladi?
2)Massiv qanday e’lon qilinadi?
3)Massiv elementiga qanday murojaat qilinadi?
Foydalaniladigan asosiy va qo`shimcha adabiyotlar hamda elektron saytlar:
1.P.Karimov,S.Irisqulov,A.Isaboyev “Dasturlash”Toshkenet Ozbekiston nashriyoti_2003 yil.
2.Sh.A.Nazirov, R.V.Qobulov “Obektga mo`ljallangan dasturlash” Toshkent-2009 yil.
3.H.Rahimov,T.Dehqonov C++ Zamonaviy dasturlash tillari.
4.Гради Бuч. Объектно –ориентированной анализ и проектирование с примерами приложений на С++. Невский диалект, 2001 г
5. Грехем И. Объектно ориентированные методы. Принсипы и практика. Вильямс. 2004
Internet elektron saytlar: www.ziyonet uz , www.nkmk.uz www.ndpu.uz, www.tdtu.library.uz
Do'stlaringiz bilan baham: | 
