SolidBrush Brush2 = нов SolidBrush (System Рисуване Цвят LightCyan ...); // Създаване на четка

SolidBrush Brush3 = нов SolidBrush (System Рисуване Цвят Червен ...);

Шрифта = нов Font ( "Times New Roman", 30, FontStyle Bold | FontStyle курсив ..); // букви описание стил

за (а = 2; а <24; a++)

за (б = 0; б <15; b++)

Графика myGraphics = CreateGraphics (); // създаване на повърхността рисунка

ако (Tet [а, Ь] == вярно)

LinearGradientBrush Brush1 = нов LinearGradientBrush (нов правоъгълник (20 * б, 20 * а, 20, 20), Цвят Aqua, Цвят Син, 45 ..);

Правоъгълник R1 = нов правоъгълник (20 * б, 20 * (с - 1), 20, 20); // асоцииране на пълни клетки в региона

myGraphics. FillRectangle (Brush1, r1); // четка попълнено област

ако (Tet [а, Ь] == фалшиви)

Правоъгълник R1 = нов правоъгълник (20 * б, 20 * (с - 1), 20, 20); // Асоциация на празните клетки в региона

myGraphics. FillRectangle (Brush2, r1); // боядисване на празния участък

частен невалидни button2_KeyUp (обект подател, KeyEventArgs д)

ключ = д. Кодът. ToString ();

ако "Право" бутон (клавиш == "Право") // проверка натиснете

таймер. Активирана = фалшива;

ако (NumbeF == 0 к <13 && Tet [i - 1, j + 2] == false && Tet [i, +2] == false) // проверка свободного места справо

Tet [Ь, J + 2] = вярно;

Tet [I - 1, J + 2] = вярно;

Tet [I - 1, J] = фалшива;

ако (Razp == 0 к <13 && Tet [i, j + 2] == false && Tet [i - 1, j] == false) // проверка свободного места справо

Tet [I - 1, J] = вярно;

Tet [Ь, J + 2] = вярно;

Tet [Ь, J - 1] = фалшива;

Tet [I - 1, J - 1] = фалшива;

ако (Razp == 1 к <14 && Tet [i - 1, j + 1] == false && Tet [i, j + 1] == false && Tet [i + 1, j + 1] == false) // проверка свободного места справо

Tet [I - 1, J] = фалшива;

Tet [Ь + 1, J - 1] = фалшива;

Tet [I - 1, к + 1] = вярно;

Tet [Ь, J + 1] = вярно;

Tet [Ь + 1, к + 1] = вярно;

ако (Razp == 2 к <13 && Tet [i, j + 2] == false && Tet [i + 1, j + 2] == false) // проверка свободного места справо

Tet [Ь, J + 2] = вярно;

Tet [Ь + 1, J + 2] = вярно;

Tet [Ь, J - 1] = фалшива;

Tet [Ь + 1, к + 1] = фалшива;

ако (Razp == 3 к <13 && Tet [i - 1, j + 2] == false && Tet [i, j + 1] == false && Tet [i + 1, j + 1] == false) // проверка свободного места справо

Tet [I - 1, J + 2] = вярно;

Tet [Ь, J + 1] = вярно;

Tet [Ь + 1, к + 1] = вярно;

Tet [I - 1, J] = фалшива;

Tet [Ь + 1, J] = фалшива;

и дори тогава успехът е гарантиран, която се предоставя. Все пак, това се случва много рядко, всяка година или дори на всеки две години в целия свят. [4] 2. Технологии за създаване на компютърни игри 2.1 стъпки за развитието на компютърните игри задача развитие Предварително производство на този етап - да се развие концепцията за игра, характер дизайн, изберете средствата за проекта, за да се създаде.

и фигури; наслагване на знамена, достигащи най-долното чекмедже, свободните клетки и др. Константите 3.4. Описание и обосновка на избора на състава на хардуер и софтуер. Паскал език е бил избран да напише програмата. Отказ от Turbo Vision библиотека е продиктувано от невъзможността да се работи с тази библиотека в графичен режим. 4. Очаквани технически и икономически показатели. Очакваното развитие ще бъде.

изберете менюто за помощ, както и да се запознаят с информация за приложението изберете Относно Заключение В хода на курсовата работа са били прегледани и анализирани основните методи за генериране на псевдо-случайни числа: линеен congruential метод, метод на Фибоначи и със закъснение, Blum алгоритъм, Blum и Shub, Mersenne Twister , За изпълнението бяха избрани в курсовата работа: метод.