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

int r; // случайное число

int buf[MAX_SIZE];

/* в buf[i] записываем, сколько раз число i

записали в массив Pole */

int i, j; // massiv indekslari

// запишем в массив Pole случайные числа

// от 0 до nр, где л - кол-во картинок

// каждое число должно быть записано два раза

for (i =0; i < np; i++)

buf[i] = 0;

Randomize(); // TSG initsializatsiya qilish

for (i = 0; i < H; i++)

for (j = 0; j < W; j++) {

do {

r = RandomRange(0,np);

}while (buf[r]==2);

Pole[i][j] = r; // rasmlar kodi

buf[r]++;

}

// здесь поле сгенерировано

nf = 0;

}

// maydonni qayta chizish

void __fastcall TForm1::ShowPole()

{

int row, col;

for (row = 0; row < H; row++)

for (col = 0; col < W; col++)

Kletka(row,col);

}

// maydondagi katakni chizish

void __fastcall TForm1::Kletka(int col,int row)

{

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

TRect src, dst;//источник и получатель битового образа

// katak koordinatlarini forma yuzasi

// koordinatlariga o’tkazish

x = (col)*WK;

y = (row)*HK;

if (Pole[col][row] >= 200) {

/* Bu katak uchun jufti topildi. Katakni maydondan o’chirish kerak */

// chegara va buyash soxasi ranglarni o’rnatis

Canvas->Brush->Color = clBtnFace;

Canvas->Pen->Color = clBtnFace;

Canvas->Rectangle(x, y, x+WK-2, y+HK-2);