Планирование уроков на учебный год (по учебнику Н.Д. Угриновича, профильный уровень)



Уроки 31 - 34
§1.10. Графы и их исследование с использованием языков объектно-ориентированного программирования Visual Basic и Turbo Delphi




Содержание урока

1.10.1. Введение в теорию графов
1.10.2. Изучение графов на языке Visual Basic

Проект «Построение основного связного дерева графа» на языке Visual Basic

Обработчик события вывода в графическое поле вершин графа

Обработчик события вывода элементов матрицы смежности взвешенного ориентированного графа

Обработчик события вывода элементов матрицы смежности взвешенного неориентированного графа

Обработчик события построения остовного связного дерева минимального веса

Контрольные вопросы

1.10.3. Изучение графов на языке Turbo Delphi

1.10.2. Изучение графов на языке Visual Basic


Обработчик события вывода в графическое поле вершин графа


Создадим обработчик события генерации случайных координат вершин графа и их рисования в графическом поле.

4. Щелкнуть по кнопке Button1 ив заготовку обработчика события ввести программный код:


Private Sub Button1_Click (...)
'Определение областей рисования
Graph1=Me.PictureBox1.CreateGraphics()
Graph2=Me.PictureBox2.CreateGraphics()
'Очистка областей рисования и полей списков
Graph1.Clear(Color.White)
Graph2.Clear(Color.White)
ListBox11.Items.Clear()
ListBox12.Items.Clear()
ListBox13.Items.Clear()
'Генерация случайных координат вершин графа
'и их рисование
For I=1 То 5
Р(I).X=Int(Rnd()*200)
Р(I).Y=Int(Rnd()*200)
Graph1.DrawEllipse(Pen2, P(I).X, P(I).Y, 2, 2)
Graph1.DrawString (I, drawFont, drawBrush, P(I) .X, P(I).Y)
Next I
End Sub

5. Запустить проект и осуществить щелчок по кнопке Вершины графа.

В графическое поле будут выведены вершины графа и их номера (рис. 1.64).

Рис. 1.64. Вершины графа



Следующая страница Обработчик события вывода элементов матрицы смежности взвешенного ориентированного графа



Cкачать материалы урока





Наверх