Скачать 292.04 Kb.
|
Министерство сельского хозяйства РФ Федеральное государственное образовательное учреждение высшего профессионального образования «Пермская государственная сельскохозяйственная академия имени академика. Д.Н. Прянишникова» Козлов А.Н. МЕТОДИЧЕСКИЕ УКАЗАНИЯ ПО ВЫПОЛНЕНИЮ УЧЕБНОЙ ПРАКТИКИ СТУДЕНТАМИ 1 КУРСА (направление 080800) Утверждено методической комиссией ФПИ Протокол № ….. от …………20… г. Пермь 2011 ОГЛАВЛЕНИЕ
МЕТОДИЧЕСКИЕ УКАЗАНИЯ ПО ВЫПОЛНЕНИЮ УЧЕБНОЙ ПРАКТИКИ СТУДЕНТАМИ 1 КУРСА (специальность 080801) 1.Общие положения об учебной практике Учебная практика имеет целью совершенствование практических навыков студентов по применению современных прикладных программных средств общего назначения в профессиональной деятельности на основе знаний, полученных в ходе изучения курса «Информатика и программирование». Задачей практики является углубление теоретических знанийи совершенствование навыков: - программирования на персональном компьютере с применением процедурных языков программирования; - обработки и визуализации данных в офисных приложениях MS Office. - программирования в VBA. - оформления документации в MS Word. По окончании практики студент предоставляет руководителю практики отчет о проделанной работе и полученных результатах. Форма итогового контроля по практике – зачет с оценкой. На зачете студент демонстрирует работу созданных программ и макросов. При успешном прохождении практики студенту выдается документ о присвоении рабочей специальности. 2.Тематика учебной практики. Учебная практика выполняется по теме: «Программирование, расчет значений и построение графика тригонометрической функции на заданном интервале» в соответствии с вариантом задания. 3.Требования к выполнению задания по учебной практике. В соответствии с тематикой учебной практики, требуется:
- Расчет значений тригонометрической функции на заданном интервале; - Вывод полученных значений во внешний текстовый файл в виде таблицы; - Построение на экране дисплея графика функции по найденным значениям.
4.Подготовка отчета по учебной практике Отчет по учебной практике выполняется в виде реферата (в обложке) и должен содержать:
5. Защита отчета о практике. В установленное преподавателем время студент прибывает на кафедру, имея с собой оформленный отчет и программы на ФЛЭШКЕ. После проверки преподавателем реферата студент отчитывается по практической части:
6.Методические указания. 6.1.Основные понятия и средства машинной графики в Паскале Графический модуль Graph В стандарте Паскаля не предусмотрен графический вывод. Начиная с 4-ой версии Паскаля появилась библиотека, (модуль) GraphАВС.tpu, которая содержит большой набор процедур и функция для работы с графикой. Для того, чтобы в программе можно было обращаться к процедурам и функциям модуля GraphАВС.tpu, необходимо в начале программы написать строку: Uses GraphАВС; Для инициализации (включения) графического режима используется процедура: InitGraph(Driver, Mode : integer; Path : String), где целые переменные Driver и Mode определяют тип графического драйвера и режим его работы. Строковая переменная Path содержит путь к файлу графического драйвера. Возможно автоматическое определение драйвера и установка режима: Driver := Detect; InitGraph(Driver, Mode, ‘’); где Detect – имя константы модуля Graph, соответствующее автоматическому выбору драйвера. Возвращение в текстовый режим работы дисплея осуществляет процедура: CloseGraph; Графические координаты Графические оси координат расположены на экране следующим образом: То есть, горизонтальная ось Х направлена слева направо, а вертикальная ось У – сверху вниз. В соответствии с режимом VGHi, по горизонтали на экране помещается 640 точек, а по вертикали – 480 точек. Графические процедуры Line(X1,Y1,X2,Y2 : integer) – рисует линию от точки (X1,Y1) до точки (X2,Y2); PutPixel(X,Y : integer; Color : Word) – рисует точку с координатами (X,Y) цветом Color; OutTextXY(X,Y : integer; Text : string) – отображает Text, начиная с координат (X,Y). Построение графика функций Требуется составить программу построения на экране графика функции У = F(Х); Решение задачи будем проводить в следующем порядке:
Xg = Xgmin + [(Xgmax-Xgmin)/(Xmax-Xmin)*(X-Xmin)]; Yg = Ygmin + [(Ygmax-Ygmin)/(Ymax-Ymin)*(Y-Ymin)], Где квадратные скобки означают округление до целого числа (функция Round). Пример (в отчете отразить пример в соответствии с вариантом). Требуется построить график функции У = 2*sin(Х) + cos(2*Х) на интервале [0, 2*pi] с шагом 10 градусов (2pi/36 радиан). Решение. Для построения графика функции на экране, необходимо связать найденные в программе значения (Х,У) с графическими координатами (Xg,Yg):
Xg = 10 + [(210-10)/(2*pi-0)*(X-0)] = 10 + [100*X/pi]; Yg = 240 + [(40-240)/(3-(-3))*(Y-(-3))] = 140+[-100*Y/3]. Вместе с графиком функций выводим на экран оси координат. Ось Х имеет координату Yg = (Ygmin+Ygmax)/2 = 140, ось Y имеет координату Xg = Xgmin = 10; 6.2. Макросы и VBA. Задание №1. Запись макроса в Word Запустите редактор Microsoft Office Word. Выберите на панели Сервис / Макрос / Начать запись или нажмите индикатор Начать запись на статусной панели. Замените имя макроса (Макрос1), предложенное по умолчанию, на имя Создание_Проекта_Распоряжения. Добавьте следующий текст в поле Описание к автоматически созданному тексту: Проект распоряжения согласно указания № ХХХ. Примечание. Не используйте ни одну из настроек Назначить макрос (ни панели, ни клавиши). 5. Нажмите ОК, чтобы закрыть диалоговое окно Запись макроса и запустить процесс записи. При этом на экране появится диалоговое окно Остановить запись и индикатор REC на статусной панели изменит цвет (показатель активности записи). Нажмите кнопку Создать на стандартной панели инструментов, чтобы создать новый чистый документ. Наберите заголовок текста Проект служебного распоряжения. 8.Выберите Вставка / Поле, чтобы открыть окно Поле, выберите в Категориях пункт Все, если он не подсвечен автоматически, затем выберите поле Create Date и задайте формат M/D/YYYY H:MM:SS A/P (например, 20/11/2006 4:15:07 РМ) и нажмите ОК. 9. Набрать следующий текст: № 056 г. Пермь [О создании …] ПРЕДЛАГАЮ: 1. Создать … 2. Определить … 3. Считать … 4. Распоряжение довести по принадлежности. 5. Контроль за исполнение распоряжения возложить на заместителей начальника по курируемым направлениям. 10. Выполните команду Сохранить как (или нажмите Ctrl+S),чтобы открыть диалоговое окно. 11. Сохраните документ под именем Проект1.doc в папке Мои документы. 12. Нажмите кнопку (Остановить запись) на панели инструментов или на индикаторе. 13. Протестируйте макрос. Для этого выберите Сервис / Макрос / Макросы, а затем выберите имя вашего макроса в списке и нажмите кнопку Выполнить. VBA создаст новый документ, введет текст в него и сохранит документ. Задание № 2. Запись макроса в Excel Запустите Microsoft Office Excel. Выберите Сервис / Макрос / Начать запись. Замените предложенное по умолчанию имя макроса (Макрос1), на имя Создание_Рабочего_Бюджета. В списке Сохранить в выберите Личная книга макросов. Добавьте следующий текст к началу автоматически созданного описания: Создание проекта рабочего Бюджета. Нажмите OK, чтобы закрыть диалоговое окно Запись макроса. При этом запустится процесс записи и появится диалоговое окно Остановить запись . ПРИМЕЧАНИЕ: И начинаем записывать макрос, как музыку на диске: начинаем записывать все выполняемые вами операции с целью дальнейшего запуска. Будьте очень внимательны при записи макроса – не делайте лишних действий и ошибок. Нажмите кнопку Создать на стандартной панели инструментов, чтобы создать новую книгу. 8. Наберите таблицу, предложенную ниже:
9.Выполните команду Сохранить, чтобы открыть диалоговое окно Сохранить как. Сохраните книгу под именем Бюджет.xls в папке по вашему усмотрению. Например, используем папку d:\ Общие. Нажмите кнопку Остановить запись кнопку на индикаторе или на панели инструментов, выбрав Сервис / Макрос / Остановить запись. 10.Протестируйте получившийся макрос. Для этого выберите Сервис / Макрос / Макросы или нажмите Alt+F8. Затем выберите имя вашего макросе в списке, и нажмите кнопку Выполнить. VBA создаст новую книгу, создаст таблицу, введет в нее соответствующую информацию и сохранит книгу. Заметьте, что Excel покажет вам предупреждение о перезаписи, сохраняемой книга, в то время как Word делает это молча. Задание № 3 Рассмотрим создание макроса переход по страницам любого уровня в тексте документа Word. Такой макрос даст нам возможность быстро перемещаться по тексту. 1. В меню Сервис / Макрос и активизируем пункт Начать запись. 2. В окне Запись макроса в качестве имени макроса введём Переход_страниц. 3. Для задания горячей комбинации клавиш нажмём вторую кнопку со словом Клавишам из группы кнопок под именем Назначить макрос. 4. В открывшемся окне Настройка клавиатуры нажимаем комбинацию Ctrl+H, находясь в строке Новое сочетание. Нажмите сначала кнопку Назначить, а затем - кнопку Закрыть. Горячая комбинация для вызова макроса назначена, и запись макроса началась. 5. В меню Правка нажмите Перейти. 6. В раскрывшемся окне Найти и заменить в списке Объект перехода выставляем значение Страница. Проверяем, что строка под названием Введите номер страницы пуста. Нажимаем кнопку Далее. Затем нажмите кнопку Закрыть. Диалог Найти и заменить закрывается, курсор оказывается на следующей странице в тексте документа. 7. В меню Сервис / Макрос активизируем пункт Остановить запись. 8. Протестируйте получившейся макрос. Теперь в любой момент мы можем нажать комбинацию Ctrl+H, и курсор тут же переместиться к следующей странице. Таким образом, быстро можно просмотреть любой объемный документ. 9. Создайте аналогичный макрос для перехода к предыдущей странице. С его помощью можно быстро перемещаться по тексту и в обратном направлении. Для этого горячей комбинацией этого макроса необходимо назначить комбинацию Ctrl+Shift+H. А в строке Введите номер страницы окна Найти и заменить поставить знак минус. Задание № 4 1.Запустите Microsoft Office Excel. 2.Откройте Лист Excel и в ячейке А1 вставьте цифру 7. 3.Выберите Сервис / Макрос / Начать запись. 4.В появившемся окне Запись макроса в поле Имя макроса указать ПРОБА. 5. Задайте комбинацию клавиш для его запуска (например, Ctrl + q) и нажмите кнопку ОК. 6. Выполнить следующие операции: ПРИМЕЧАНИЕ: Будьте очень внимательны при записи макроса – не делайте лишних действий и ошибок. - сначала выделите ячейку А1, нажав на неё, затем копируйте её содержание и вставляйте в ячейку С1 (простая операция копирования). 7.Нажмите кнопку Остановить запись кнопку на индикаторе или на панели инструментов, выбрав Сервис / Макрос / Остановить запись. 8. Удалите данные с листа, а затем в ячейку А1, поставьте любое значение и нажмите Ctrl + q. Если вы всё сделали правильно, в ячейку С1 должны автоматически копироваться значения А1. 9. Перейдем к редактору Visual Basic. Для этого через меню Сервис / Макрос / Макросы нажмите кнопку Изменить – откроется окно редактора Visual Basic. 10. Рассмотрите более подробно автоматически созданный программный код. Вот как выглядит макрос или процедура (программный код) задачи копирования ячейки А1 в ячейку С1. ПРИМЕЧАНИЕ: Процедура - это общее название всех самостоятельных частей кода. Процедура - участок кода, выделенный ключевыми словами Sub (в начале процедуры: за ним следует ее имя) и End Sub (окончание процедуры: помещается на отдельной строке). Обычно процедура выполняет одно или несколько действий. 11. Выделите строки программного кода от «Range…» до «…Paste» и копируйте их либо через меню Edit / Copy, либо с помощью правой кнопки мыши. 12. Сместите строку «End Sub» на одну строку ниже и в пустую строку вставьте скопированный программный код. 13. Во вставленном программном коде измените «А1» на «С1» и «С1» на «Е1». 14. Через панель задач перейти в Microsoft Office Excel и очистите все ячейки, а затем наберите любое значение в ячейке А1. 15. Запустите на выполнение измененный макрос либо нажатием комбинации клавиш Ctrl + q, либо через меню Сервис / Макрос / Макросы / Выполнить. Задание № 5 Запустите Microsoft Office Excel. Откройте Лист Excel. Выберите Вид / Панели инструментов/ Visual Basic. На открывшейся панели редактора Visual Basic нажмите кнопку Панель элементов управления и перенести элемент «Кнопка» на рабочее поле. На Панели элементов управления нажмите кнопку Окно свойства и в появившемся окне Properties в графе Caption переименуйте название кнопки CommandButton1 на Создание Овала. 6. Выберите Сервис / Макрос / Начать запись. 7. В появившемся окне Записи Макроса укажите Имя макроса и комбинацию клавиш для его запуска (Ctrl +а) и нажмите ОК. 8. С панели Рисование перенесите на рабочее поле Овал, а затем выделите этот объект и зайдите в Формат Автофигуры, а затем зайдите Цвет Заливки – Красный, Цвет линии – черный, Толщина линии – 3 пт. 9. В меню Сервис / Макрос активизируйте пункт «Остановить запись». 10 . Зайдите в Microsoft Visual Basic в меню Редактор Visual Basic в модулях найти наш Макрос, скопируйте код макроса и вставьте в процедуру: Private Sub CommandButton1_Click() End Sub 11. Протестируйте макрос. Теперь при нажатии кнопки Создать Овал будет появляться на рабочем поле соответствующая геометрическая фигура. Задание № 6 1. Запустите Microsoft Office Excel. 2. Откройте окно Макрос либо через меню Сервис / Макрос / Макросы, либо нажатием кнопок (Alt + F8). 3. Создайте макрос. Для этого в поле Имя наберите MY, а в поле Находится в выберите - Это книга (место нахождения этого макроса). 4. Нажмите кнопку Создать, если она станет активной. Появится редактор VBA. 5. Введите в пустую строку программный код MsgBox “ПРИВЕТ VBA!!!”, как на рисунке (Пустая строка между Sub и End Sub). ПРИМЕЧАНИЕ: Здесь используется функция MsgBox, которая выводит на экран окно сообщения. 6. Закройте редактор VBA и закройте файл. 7. Привяжите макрос к кнопке. Для этого через меню Сервис / Настройка / Команды в разделе Категории выберите Макросы. 8. Захватите левой кнопкой мыши «веселую желтую рожицу» и перетащите ее на панель. 9. Нажмите правой кнопкой мыши на «рожице» и выберите пункт меню Назначить макрос. 10. Выберите макрос MY и нажмите Ok, а затем закройте окно настройки. 11. Протестируйте макрос. Для этого нажмите кнопку - макрос выполняется и появляется надпись. Задание № 7 Запустите редактор Microsoft Office Word. Создайте новый макрос с именем Радиус через Сервис / Макрос / Начать запись и нажмите Остановить запись. Откройте окно редактора Visual Basic и найдите в окне Code программный код: Sub Радиус () ' ' Радиус Макрос ' Макрос создан < Дата > < Ваше имя > ' End Sub 4. Запишите в пустой строке следующий программный код: RADfrm.Show ПРИМЕЧАНИЕ: Этой строкой вызывается форма RADfrm. 5. Создайте саму форму. Для этого в окне редактора Visual Basic найдите кнопку (Insert UserForm) перед вами появится окно с пустой формой, перейдите на панель Properties (слева, если у вас его нет нажмите кнопку F4 ). В ней найдите свойство (Name) и измените его значение (по умолчанию UserForm1) на RADfrm, в свойстве Caption (Надпись) наберите ВЫЧИСЛЕНИЕ РАДИУСА. 6. На саму форму перенесите Textbox (окно ввода), Button (кнопку) и Label(метку). Разместите всё друг за другом: 7. Задайте следующие параметры через на панель Properties: Textbox: Name: txtRadius Text: (пусто) Button: Name: cmdCalc Caption: РЕЗУЛЬТАТ Label: Name: lblLenght Caption: (пусто) 8. Разберитесь в том, что должно получиться: в поле ввода вводим цифру, нажимаем на кнопку Результат, и на Label появляется сосчитанная по формуле длина окружности. 9. Откройте окна программного кода созданной формы. Для этого щелкните два раза по кнопке Результат. 10. Напишите в окне кода следующее: 'Объявляем переменные радиуса и длины окружности Dim Radius As Integer Dim Lenght As Integer ' Объявление постоянного числа Pi Const Pi = 3.14159 Private Sub cmdCalc_Click() 'Считывание чисел в окне ввода Radius = txtRadius.Text ' Считаем… Lenght = 2 * Radius * Pi 'Полученный результат выводим на Label lblLenght.Caption = Lenght End Sub 11. Протестируйте макрос. Для этого перейдите через Панель задач в Word, запустите на выполнение макрос, в появившемся окне ВЫЧИСЛЕНИЕ РАДИУСА в поле Textbox наберите любое число и нажмите кнопку Результат. Задание № 8 Это задание позволяет сделать текущий запрос о свободной оперативной памяти. К примеру, на слабых машинах, из-за сильной их загруженности, приложения Microsoft Office вылетают с сообщением об ошибке. Причина, которой можно объяснить это - нехватка оперативной памяти, и ошибка при переходе на использование «виртуальной» памяти. ПРИМЕЧАНИЕ: Код этого макроса уже намного серьезнее предыдущих. Стандартными средствами Visual Basic, на котором пишутся макросы, эту задачу не решить. На помощь приходят API - функции Windows. API - это сокращение от Application Programming Interface. API состоит из целого ряда функций, которые позволяют использовать системные Windows-конструкции. Чтобы использовать API -функции, нужно сначала их декларировать (объявить). Запустите Microsoft Office Excel. Создайте новый макрос с именем RAM через Сервис / Макрос / Начать запись и нажмите Остановить запись. Откройте окно редактора Visual Basic и найдите в окне Code программный код: Sub RAM () ' ' RAM Макрос ' Макрос создан < Дата > < Ваше имя > ' End Sub 4. Запишите в пустой строке Ramfrm.Show ПРИМЕЧАНИЕ: Этой строкой вызывается форма Ramfrm. Создайте саму форму. Для этого в окне редактора Visual Basic найдите кнопку (Insert UserForm) и перед вами появится окно с пустой формой. Перейдите на панель Properties (слева, если у вас его нет нажмите F4). В ней найдите свойство (Name) и измените его значение (по умолчанию UserForm1) на Ramfrm. Нажмите F7 , появится окно редактора кода. Удалите все, что там есть и внесите туда следующий код: Private Declare Sub GlobalMemoryStatus Lib "kernel32" (lpBuffer As MEMORYSTATUS) Private Type MEMORYSTATUS dwLength As Long dwMemoryLoad As Long dwTotalPhys As Long dwAvailPhys As Long dwTotalPageFile As Long dwAvailPageFile As Long dwTotalVirtual As Long dwAvailVirtual As Long End Type 7. Наберите программный код процедуры, которая выполняется при старте формы: Private Sub UserForm_Initialize() Dim w1 As MEMORYSTATUS Dim q1 As Single Dim q2 As Single Dim d2 As String Dim e As Integer w1.dwLength = Len(w1) GlobalMemoryStatus w1 q1 = w1.dwMemoryLoad q2 = w1.dwTotalPhys d2 = (q2 - q1 * 0.01 * q2) / 1024 ^ 2 d2 = Int(d2 * 10) / 10 d2 = d2 & " Mb" e = MsgBox("Свободно: " & d2, vbOKOnly + vbInformation, "Информация о RAM") If e = 1 Then End End If End Sub 8. Протестируйте созданный макрос RAM. 7. Варианты заданий. Номер варианта (реферата и практического задания) определяются в табл.1 по последней и предпоследней цифрам номера зачетной книжки студента (шифра). Например, студент, у которого номер зачетной книжки оканчивается на 58, должен выбрать вариант №29 по списку тем рефератов и по табл. 2. Таблица 1 |
Методические указания по организации учебной практики Для специальности 060101 Лечебное дело У89 Уход за больными терапевтического и хирургического профиля [Текст] : методические указания по организации учебной практики /... | Методические указания по изучению курса и выполнению контрольных... География воздушного транспорта : Методические указания по изучению курса и выполнению контрольных работ/ Университет га. С. – Петербург,... | ||
Методические указания по изучению курса и выполнению контрольных работ Для студентов зф Автоматизированные системы бронирования и продажи авиационных услуг: Методические указания по изучению курса и выполнению контрольных... | Методические указания по выполнению курсовых работ по бухгалтерскому учету Курсовая работа по дисциплине «Бухгалтерский учет» выполняется студентами в соответствии с учебным планом на завершающем этапе обучения... | ||
Педагогические условия подготовки выпускника вуза к предпринимательской... Методические указания по выполнению контрольных работ студентами по учебной дисциплине «Учет на предприятиях малого бизнеса» | Материалы к консультативному семинару «Как предотвратить финансовые... Методические указания по выполнению контрольных работ студентами по учебной дисциплине «Учет на предприятиях малого бизнеса» | ||
Методические указания по выполнению программы педагогической практики... Обсуждено и рекомендовано к использованию в учебном процессе на заседании кафедры физической культуры и адаптивных технологий | Методические рекомендации по проведению практических занятий по учебной... Методические указания по выполнению контрольных работ студентами по учебной дисциплине «Учет на предприятиях малого бизнеса» | ||
Методические указания по выполнению контрольной работы для самостоятельной... Методические указания по выполнению контрольной работы одобрены на заседании Научно-методического совета взфэи | Методические указания к выполнению курсовой работы по дисциплине «Основы научных исследований» «Прикладная биотехнология» Наумовой Н. Л. Методические указания к выполнению курсовой работы предназначены для студентов 2 курса... | ||
1. Теоретические основы аудита предприятий малого бизнеса 4 Методические указания по выполнению контрольных работ студентами по учебной дисциплине «Учет на предприятиях малого бизнеса» | Методические указания по выполнению студентами самостоятельной работы Цели и задачи дисциплины | ||
Рабочая программа и методические указания по прохождению практикума... Цель и задачи практикума учебного ознакомительного (учебной ознакомительной практики) | Методические указания по выполнению выпускной квалификационной работы... Методические указания по выполнению выпускной квалификационной работы (бакалаврской работы) /Орёл, государственный аграрный университет;... | ||
Методические указания для обучающихся 1 курса по профессии 220703.... Методические указания предназначены для обучающихся 1 курса учебных заведений начального профессионального образования по профессии... | Методические указания по выполнению контрольной работы по дисциплине «Имиджелогия» Программа курса, задания и методические указания по выполнению контрольной работы по дисциплине «Имиджелогия» для студентов заочной... |