Моделирование процессов презентация

x, y, v;
double z = r.NextDouble();
if (z <= p1) // джекпот
{
x = 0; y = 7;
v = 5 * v1;
}
else
if (z <= p1 + p2) // средний выигрыш
{
x = y = r.Next(10);
v = 5 * v2;
}
else // проигрыш
{
for (; ; )
{
x = r.Next(10);
y = r.Next(9);
if (x <= y) y++;
if (!(x == 0 && y == 7)) break;
}
v = -5;
}
money += v;
bank -= v;

for (int i = 0; i < Подходов; i++)
{
int остаток = Начальный_капитал, игр = 0;
do
{
int v;
double z = r.NextDouble();
if (z <= p1) // джекпот
v = 5 * v1;
else
if (z <= p1 + p2) // средний выигрыш
v = 5 * v2;
else
v = -5;
остаток += v;
игр++;
} while (остаток >= 5 &&
остаток <= Начальный_капитал);
}

у пропасти, через которую перекинут старый верёвочный мост. Идти по нему можно только с лампой, которая имеется в единственном экземпляре, и выдержать мост может только двоих. Силы у ковбоев на исходе, и чтобы переправиться, им требуется по 25, 20, 10 и 5 мин. каждому соответственно. Успеют ли ковбои переправиться за один час? Пример переправы: max(5, 10) + 5 + max(5, 20) + 5 + max(5, 25) = 65 мин.

bool[] set;
int[] T = new int[] { 5, 10, 20, 25 };
int time;

private void button1_Click(object sender, EventArgs e)
{
set = new bool[] { true, true, true, true };
time = 0;
if (!forward())
MessageBox.Show("Никакого способа переправы нет!",
"Конец полного перебора");
}

...

bool forward()
{
for (int i = 0; i < 3; i++)
if (set[i])
for (int j = i+1; j <4; j++)
if (set[j])
{
set[i] = set[j] = false;
time += Math.Max(T[i], T[j]);
if (!(set[0] || set[1] || set[2] || set[3]))
if (time <= 60) return true;
else
for (int k = 0; k <4; k++)
if (!set[k])
{
set[k] = true;
time += T[k];
if (forward())
return true;
set[k] = false;
time -= T[k];
}
time -= Math.Max(T[i], T[j]);
set[i] = set[j] = true;
}
return false;
}

длиной S км, если за день он может пройти всего 20 км, а еды может взять с собой только на три дня пути. Склады провизии можно делать только в местах ночлега (т.е. через каждые 20 км).