pan align="justify"> (0 .. 7), Які відповідають відповідно номером рядку и номером стовпчік. За помощью ціх ціклів віводжу Значення міток Label1 (j). Caption = (8 - j) - числа, что відповідають номеру стовпчік, а такоже Label2 (i). Caption = chr (97 + i) - букви латинську алфавіту, Які відповідають номеру рядка. Функція Chr (97 + i) повертає Односимвольні стрічку, яка містіть символ з ASCII-кодом (97 + і), тоб a, b, c, ..., f, h. Щоб очистити ВСІ клітінкі и Встановити колір, я використовуются умовний оператор If ... Then ... Else. Тоб, ЯКЩО сума (i + j) діліться на 2 без остачі, то за помощью Властивості BackColor ВСТАНОВЛЕНО колір клітінкі чорний, в Іншому випадка - білий.
Оскількі ще жодної королеві немає на дошці, тому kilk = 0, а колонка, З якої будемо розставляті королеві становится Нульовий - col = col + 1. Одразу ж встановімо Значення логічної змінної b = true, ТОМУ ЩО ми збіраємось поставіті Першу королеву. Если b = true, то зафіксуємо координат та Першої королеві: coordJ = col; coordI = 0, и замінемо Значення b з true на false, ТОМУ ЩО перша королева Вже поставлена. Для всіх других королев координатами Такі: coordJ = i; coordI = j. p align="justify"> Далі нужно перевіріті чг вільна клітінка на шаховій дошці з цімі координатами. Если так, то збільшуємо лічильник kilk на одиницю, а Дану клітинку зафіксуємо, что вона Вже зайнята. Аналогічно нужно зафіксуваті ті клітінкі, Які б є дана королева. Оскількі королева б є по горізонталі, по вертікалі и по діагоналях, то звітність, ці клітінкі помітіті. За помощью двох ціклів відмічаю клітінкі по горізонталі и по вертікалі. Далі нужно відмітіті діагоналі, Які проходять через Дану королеву, тоб ті, Які б є ця королева. Для цього використову ще Чотири цикли, за помощью якіх відмічаю ті клітінкі діагоналей, Які знаходяться по таких сторонах від поточної королеві:
вліво-вгору;
вправо-вниз;
вліво-вниз;
вправо-вгору.
После цього звітність, представіті королеву у графічному вігляді в клітінці. Дану королеву я розроб в Microsoft Image Editor и зберіглася з розшіренням.bmp. Оскількі існують чорні и білі клітінкі, то я зберіглася два файли, в одному з якіх королева розташована на чорному фоні, в Іншому - на білому и ВСТАНОВИВ розмір даніх королев, что відповідають розміру клітінкі на шаховій дошці. Щоб взнати, якові королеву ставити на дошці я використовуются умовний оператор If ... Then ... Else, тоб ЯКЩО сума (coordI + coordJ) діліться на два без остачі, то в клітинку ставлю чорну королеву, в Іншому випадка - білу. p align="justify"> Ще залішається вивести в мітку lblEkran координат та поточної королеві. Оскількі координат - це цілі числа, то їх звітність, перетвор...
