Порядок выполнения задания 2.
РОССИЙСКАЯ АКАДЕМИЯ ПРАВОСУДИЯ
ЦЕНТРАЛЬНЫЙ ФИЛИАЛ
Кафедра правовой информатики, информационного права
И естественнонаучных дисциплин
УТВЕРЖДАЮ
Заведующий кафедрой
к.т.н., доцент
А.В. Мишин
«____» _______ 2011 г.
ПЛАН
Практического занятия
Дисциплина: «Информационные технологии в юридической деятельности»
Тема 6: «Моделирование, алгоритмизация и программирование
Информационных задач»
Разработал:
профессор кафедры, д.т.н., доцент
Л.Е. Мистров
Материалы обсуждены и одобрены
на заседании кафедры ПИИПЕД,
протокол № 1 от « 29 » августа 2011г.
Воронеж - 2011
План проведения занятия
Тема 6. 5 . Программирование задач с линейной и разветвляющейся
Структурой в среде Visual Basic
Учебные вопросы | Время, мин. |
Вступительная часть . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 1. Программирование задач с линейной структурой . . . . . . . . . . 2. Программирование задач с разветвляющейся структурой. . . Заключительная часть . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . | 5 30 40 5 |
|
|
Литература
основная:
1. Мистров Л.Е. Информатика и математика: информатика / Л.Е. Мистров, А.Ю. Кузьмин, С.А. Мишин. – Воронеж, Научная книга, 2008. – 282 с.
2. Информатика для юристов и экономистов: учебник для вузов / Под ред. С.В. Симоновича. - СПб.: Питер, 2004. - 688 с.
дополнительная:
1. Информатика: практикум по технологии работы на компьютере / Под ред. Н.В. Макаровой. - М.: Финансы и статистика, 2003. - 256 с.
2. Кормен Т.Х. Алгоритмы: построение и анализ / Т.Х. Кормен, Ч.И. Лейзерсон, Л.Р. Рональд. - Вильямс, 2005. - 1296 с.
3. Острейковский В.А. Информатика: учебник для студентов вузов / В.А. Острейковский. - М.: Высшая школа, 2001. - 511 с.
4. Попов В.Б. Основы компьютерных технологий / В.Б. Попов. - М.: Финансы и статистика, 2002. - 704 с.
Содержание занятия и методика его проведения
Вступительная часть. Преподаватель проверяет наличие и готовность студентов к проведению занятия, делает соответствующие записи в журнале. Объявляется тема, цель и план проведения занятия. Акцентируется внимание студентов на важности изучаемой темы для усвоения последующего материала учебной дисциплины.
|
|
Осно вная часть. Преподаватель доводит основные теоретические сведения и организует выполнение заданий по теме.
Заключительная часть. В заключительной части практического занятия преподаватель подводит итоги, отмечает ошибки в действиях студентов, оценивает работу и отвечает на их вопросы, выдаёт задание на самоподготовку.
Программирование задач с линейной структурой
Задание 1. Написать программу для реализации алгоритма решения задачи с линейной структурой (задание 1 темы 6.2). Примерная форма приложения представлена на рис. 1.
Порядок выполнения задания 1.
1.1. Включите компьютер и зарегистрируйтесь в системе под именем пользователя Студент.
1.2. Щёлкните два раза по пиктограмме на рабочем столе Visual Basic и создайте стандартное приложение. Для этого щёлкните по пиктограмме Standard . exe. Откроется новый проект Visual Basic Project 1 и окно новой формы Form 1.
Рис. 1. Образец формы для задания 1
1.3. Используя панель инструментов (ToolBox), расположите на форме в соответствии с рис. 3.16 шесть тестовых окон , восемь меток и сделайте в них надписи, поясняющие назначение текстовых окон. Разместите две командные кнопки и сделайте надписи на них «Вычислить» и «Exit».
|
|
1.4. Откройте окно редактирования кода первой командной кнопки «Вычислить». Для этого дважды щёлкните по этой кнопке, перед Вами откроется окно с кодом программы. Для события Click напишите программу процедуры:
Private Sub Command 1_ Click ()
Dim a As Double
Dim b As Double
Dim c As Double
Dim p As Double
Dim t As Double
Dim ha As Double
Dim hb As Double
Dim hc As Double
a = Text1.Text
b = Text2.Text
c = Text3.Text
p = (a + b + c) / 2
t = 2 * Sqr(p * (p - a) * (p - b) * (p - c))
ha = t / a
hb = t / b
hc = t / c
Text4.Text = ha
Text5.Text = hb
Text 6. Text = hc
End Sub
Вернитесь в окно формы, нажав кнопку «Показать объект» проводника проектов.
1.5. Щёлкните дважды по кнопке «E xit», в результате перед Вами откроется окно с кодом программы. Для события Click напишите следующую команду Unload Form 1, которая выгружает форму из оперативной памяти и завершает работу программы.
Private Sub Command2_Click()
Unload Form1
End Sub
1.6. Запустите программу, нажав кнопку «Старт» на панели инструментов. Введите следующие данные в текстовые окна: а=10, b=14,5 c=7,4 и нажмите кнопку «Вычислить». Посмотрите результат вычислений высот треугольника (Ha=6,86018583931951; Hb=4,73116264780656; Hc=9,27052140448583) и нажмите кнопку «Exit».
1.7. Сохраните проект в своей папке на диске C :\Мои документы и закройте его.
Задание 2. В соответствии с Вашим вариантом написать программу для реализации алгоритма решения задачи с линейной структурой (задание 2 темы 6.2). Примерная форма приложения представлена на рис. 2.
|
|
Порядок выполнения задания 2.
2.1. Создайте новый проект VB (Файл ► Новый проект ► Standard EXE).
2.2. Используя панель инструментов (ToolBox), расположите на форме в соответствии с рис. 2 два тестовых окна , три метки и сделайте в них надписи, поясняющие назначение текстовых окон. Разместите две командные кнопки и сделайте надписи на них «Вычислить» и «Exit».
2.3. Откройте окно редактирования кода первой командной кнопки «Вычислить». Для этого щёлкните дважды по этой кнопке. Для события Click напишите программу процедуры (пример кода программы приведён для задания 2):
Рис. 2. Образец формы для задания 2
Private Sub Command1_Click()
Dim x As Double
Dim y As Double
Dim x1 As Double
Dim x2 As Double
Dim x3 As Double
x = Text1.Text
x1 = Sqr(2 * x + 2) * Cos(x)
x2 = Log(4 * x * x + 3)
x3 = x2 / (x - 2)
y = x1 - x3
Text 2. Text = y
End Sub
2.4. Вернитесь в окно формы, нажав кнопку «Показать объект» проводника проектов.
2.5. Щёлкните дважды по кнопке «E xit». Для события Click напишите следующую команду Unload Form 1, которая выгружает форму из оперативной памяти и завершает работу программы.
Private Sub Command2_Click()
Unload Form1
End Sub
2.6. Запустите программу, нажав кнопку «Старт» на панели инструментов. Введите следующие данные в текстовое окно 1) x=12 2) x=-3 и нажмите кнопку «Вычислить». Посмотрите результаты вычисления значений функции f(x) в точке x0=12 (y=3,6666975544422) и в точке x0=-3 (программа выдаёт ошибку). Для завершения отладки нажмите кнопку «Конец» на панели инструментов VB.
2.7. Сохраните проект в своей папке на диске C :\Мои документы и закройте его.
Дата добавления: 2018-11-24; просмотров: 391; Мы поможем в написании вашей работы! |
Мы поможем в написании ваших работ!