Программное обеспечение

Для реализации алгоритма принятия решения в условиях риска воспользуемся средой программирования Delphi7.

Программа состоит из двух модулей, которые реализуют ввод исходной информации, считывание ее, преобразование входной информации в выходную и вывод выходной информации на экран.

Программа работает в различных режимах, которые зависят от задаваемых параметров:

1) Тип матрицы:

a) Матрица игры (без матрицы рисков);

b) Матрица игры с расчетом матрицы рисков;

c) Матрица рисков.

2) Вероятность состояний природы:

a) Вероятность определена;

b) Вероятность неопределенна:

i) События равновероятны;

ii) События не равновероятны.

В качестве глобальных параметров выступают количество состояний природы (m) и количество стратегий игрока (n). После каждого изменения их значений форма перерисовывается в соответствии с заданной размерностью.

Входными параметрами являются матрица игры либо матрица рисков и вектор вероятности (q). Вектор вероятности вводятся в последнюю строку (если «Вероятность определена»), либо задается произвольной последовательностью чисел (если «События не равновероятны»), либо отсутствует (если «События равновероятны»).

Выходной информацией является номер оптимальной стратегии, который после обработки исходной информации выводится в матрицу планирования. Оптимальная стратегия находится соответственно для матрицы игры или матрицы рисков, или для обеих сразу. Пользователь имеет возможность упрощение матрицы, очистки полей.

Основной модуль служит для ввода данных и необходимых настроек.

Кнопка «Просчитать риски» работает только для матрицы игры, служит для расчета матрицы рисков.

Кнопка «Задать» задает вероятность возникновения определенного состояния природы на основе произвольной последовательности чисел, работает при «События не равновероятны».

Интерфейс основного модуля:

Дополнительные модуль подключается в случае задания параметра «События не равновероятны», где пользователь рассчитывает вероятность по произвольной последовательности чисел. Количество столбцов в основном модуле и в дополнительном взаимосвязаны.

Интерфейс дополнительного модуля:

В модулях реализована проверка на заполнение полей в таблицах, при возникновении такой ситуации пользователю выдается сообщение:

Проверка на деление на ноль:

При нажатии на кнопку «Упростить», возможны два варианта:

и второй, где А с номером убранной строки:

Если в результате упрощения осталась только 1 строка, где А с номером убранной строки: