1.3.4. Построение графиков.

Сразу после завершения работы программы и получения коэффициентов k2,k3 в ячейках с B26-200E будет произведен автоматический пересчет точет для построения графика.

1.3.5 Графическая иллюстрация решения

В результате выполнения программы возможно построить графики уравнений и отметить на нем введенные точки, координаты которых находятся соответственно в поле вывода координат (см. 1.3.4) и поле ввода координат точек (см. 1.3.2.). Они строятся на поле, занимающем ячейки F34 – N51. Графики позволяют пользователь оценить расположение введенных им точек в соответствии с областью D и оценить правильность ввода. В рассматриваемом примере графики результата выглядят так:

1.3.6 Визуализация.

В вопросе оформления решения задачи в первую очередь принимались принципы создания максимального удобства в использовании и, как следствие, нивелирования эстетического неприятия.

Для этого все поля выделены цветом и обведены в рамки. Кроме того, заголовки выделены жирным шрифтом другого цвета.

Касательно взаимного расположения полей, предприняты следующие шаги: поля по возможности сведены вместе, а кнопка «Вычислить» находится в непосредственной близости от графика и поля вывода наилучших коэффициентов, что позволяет пользователю сразу после запуска программы узнать результаты вычисления и увидеть вычисленный результат в графическом отображении. Для исследуемого примера вид экрана результата представлен на следующей странице.

4. Выводы.

С помощью средств Excel и Visual Basic реализовано решение задачи по поиску наилучших с точки зрения попадания вводимых точек коэффициентов уравнений, кроме того, это решение проиллюстрировано графически.

1.5 Примечания.

1.5.1 Текст программы, связанной с кнопкой «Вычислить»

Private Sub CommandButton1_Click()

S = 0

For I = 5 To 11 Step 2

For J = 2 To 5 Step 1

d = 0

For N = 2 To 21

x = Sheets("Лист1").Cells(N, 2).Value

Y = Sheets("Лист1").Cells(N, 3).Value

If (Y * Y <= J * x) And (Y >= x * x - x + 0.1) And (Y <= I * Cos(x + 1 / 4)) Then

d = d + 1

End If

Next N

If d > S Then

S = d

K1 = I / 5

K3 = J / 2

End If

Next J

Next I

Sheets("Лист1").Cells(32, 6).Value = K1

Sheets("Лист1").Cells(32, 7).Value = K3

End Sub

Часть 2. База данных.

2.1 Формулировка задания.

Создать базу данных для организаторов выставки собак. В БД должны храниться сведения об участниках выставки и экспертах.

Для каждого участника в БД должны храниться сведения о том, из какого клуба участник, кличка, порода и возраст собаки, сведения о ро­дословной (отец и мать собаки). Участник может перейти из одного клуба в другой. На каждый клуб отводится интервал номеров, под которыми бу­дут выступать участники выставки. Сведения об экспертах должны вклю­чать ФИО; номер ринга, который он обслуживает; клуб, в котором он сос­тоит. Каждый ринг могут обслуживать несколько экспертов. Каждая порода собак выступает на своем ринге. Эксперт может отказаться от судейства, тогда возможно введение нового эксперта. Также должны храниться сведе­ния о медалистах по каждой породе.

Могут потребоваться следующие сведения:

- на каком ринге выступает заданный участник со своей собакой;

- какими породами представлен заданный клуб;

- какие медали и сколько заслужены клубом;

- какие эксперты обслуживают породу;

- какая собака у заданного эксперта.

Необходимо предусмотреть возможность выдачи справки о занятии участником призового места на выставке и отчета о выступлении клуба (сколько участников, какие породы, информация о победителях по поро­дам).

2.2 Анализ решения.

2.2.1 Принципы практической реализации.

Исходя из условий, очевидна необходимость создания нескольких «основных» таблиц, поиском по которым и будут реализованы требуемые заданием возможные запросы завуча. Для созданных таблиц вида:

- сведения об участниках выставки ;

- сведения об экспертах;

возможно реализовать все требуемые запросы перебором содержимого соответствующих граф.

2.3 Реализация решения.

2.3.1 Общие положения.

БД организована в Excel с применением Visual Basic для осуществления запросов. БД представляет собой документ Excel, состоящий из листов, посвященных

- различным сведениям

- выдаче справок

-иформациия о участниках и их питомцах

-информация о сульях

-иформациия о клубах

-иформациия о медалистах турнира

Кроме того, на листе с расписанием и на листах справок и сведений организованы поля ввода запросов, вывода результатов и управляющие выполнением запросов кнопки.

Каждый запрос управляется одинарным нажатием на соответствующую кнопку, а действия по этому сигналу регламентированы программами на Visual Basic^.