R. A. Yusupov C++ Builderda masalalar va topshiriqlar samarqand 2018 yil

int k = 1;

for (int i = 0; i < 4; i++)

for (int j = 0; j < 4; j++)

pole[i][j] = k++;

Mixer(); // toshlarni almashtirish

ShowPole(); // o’yin maydonni aks ettirish

}

// toshlarni almashtirish

void __fastcall TForm1::Mixer()

{

int x1,y1; // bo’sh katak

int x2,y2; // buni bo’shga ko’chirish

int d; // bo’shga nisbatan yo’nalish

Randomize() ;

x1 = 3; y1 = 3; // stp massiv tavsifiga qarang

for (int i = 0; i < 150; i++) // кол-во перестановок

{

do {

x2 = x1;

y2 = y1;

/*выберем фишку, примыкающую к пустой клетке, которую переместим в пустую клетку */

d = RandomRange(1,5);

switch (d) {

case 1: x2--; break;

case 2: x2++; break;

case 3: y2--; break;

case 4: y2++; break;

}

}while((x2<0) || (x2>=4) || (y2<0) || (y2>=4));

/*bu yerda bo’sh katakka ko’chiriladigan tosh aniqlanadi*/

pole[y1][x1] = pole[y2][x2];

pole[y2][x2] = 16;

x1 = x2;

y1 = y2;

}

// bo’sh katak koordinatasini saqlash

ex = x1;

ey = y1;

}

// forma yuzasiga o’yin maydonini aks ettirish

void __fastcall TForm1::ShowPole()

{

int x,y;//katakning chap yuqori burchagi koordinatasi

for (int i = 0; i < 4; i++)

for (int j = 0; j < 4; j++)

{

x = j * HC;

y = i * WC;

if (pole[i][j] != 16) {

Canvas->Brush->Color = clBtnFace;

Canvas->Rectangle(x,y, x+WC-1, y+HC-1);

Canvas->TextOutW(x+15,y+10,IntToStr(pole[i][j]));

}

else{

Canvas->Brush->Color = clBtnHighlight;

Canvas->Rectangle(x,y, x+WC-1, y+HC-1);

}

}

}

bool Finish();//tosh to’g’ri qo’yilganligini tekshirish

// katakni bosish

void __fastcall TForm1::FormMouseDown(TObject *Sender, TMouseButton Button, TShiftState Shift, int X, int Y)

{

int cx,cy; // katak koordinatlari

ex = X / WC;

cy = Y / HC;

// tanlangan katakni qo’shni bo’shga ko’chirish

if ((abs(cx-ex)==1 && cy-ey ==0)||(abs(cy-ey)==1 &&

cx-ex==0))

{

// toshni (сх,су)dan (ех,еу)ga ko’chirish

pole[ey][ex] = pole[cy][cx];

pole [cy][cx] = 16;

ex = cx;

ey = cy;

ShowPole(); // maydonni qayta chizish