Федеральное агентство железнодорожного транспорта
Омский государственный университет путей сообщения
(ОмГУПС (ОмИИТ))
Кафедра «Автоматика и системы управления»
ОТЧЕТ
по учебной практике
Место прохождения учебной практики:
Студентка гр. 26 и
С.А. Сулейменова
Руководитель учебной практики
доцент кафедры АиСУ
А.Б. Кильдибеков
201__/201__ учебный год
Задание
Задание по программе Microsoft Word.
Определите стили «Рисунок», «Подпись к рисунку», «Таблица» и «Заголовок таблицы» для оформления рисунков и таблиц. Создайте макросы «Вставка рисунка» и «Вставка таблицы». Макросы должны вставлять таблицу из одной колонки в двух строк с невидимыми границами. Первая строка должна быть оформлена стилем «Рисунок» (««Заголовок таблицы»), вторая - «Подпись к рисунку» («Таблица»). В нужных местах должны появиться надписи «Рисунок» или «Таблица». Назначьте макросам горячие клавиши.
Создайте макрос для вставки формулы в текст. Макрос должен вставлять таблицу из 1 строки и 3 столбцов с невидимыми границами. Правый столбец должен быть такой ширины, чтобы в него помещался номер формулы. В средний столбец макрос вставляет пустую формулу Microsoft Equation. Для того чтобы формула была по середине листа левый столбец должны быть такой же ширины, как и правый.
Задание по программе Microsoft Excel.
Построить двумерный график эпициклоиды по параметрическим уравнениям кривой:
x = (R + r) cos - d cos ( (R + r) / r);
y = (R + r) sin - d sin ( (R + r) / r),
microsoft excel word макрос
значения параметров: R = 100, r = 10, d = 20; угол меняется от 0 до 360 градусов. Построить двумерный график и оформить его в соответствии СТП ОмГУПС.
Смоделировать ситуацию, описанную в былине про Илью Муромца, в которой перед богатырем ставится задача выбрать одну из трех дорог. В одной из смежных ячеек вводится вариант пути (1, 2 или 3), а в другой в это время появляется описание последствий выбора.
Построить таблицу по образцу с использованием формул для расчета показателей в отсутствующих ячейках. Вычислить среднее значение показателей. Построить двумерный график, отражающий начисление заработной платы сотрудников и оформить его в соответствии СТП ОмГУПС. Построить плоскую и объемную гистограммы, отражающие начисление заработной платы сотрудников и количество отработанных часов, а также среднее значение показателей.
Постройте график функции и найти корень уравнения, f(x) = 3x + sin(x) - x^2 -2, с помощью подбора параметра, по 11-ти точкам на отрезке [-1; 2] и найти корень уравнения f(x)=0, при начальном приближении х=0,5. Ответ: х=0,5982.
Найдите решение системы линейных алгебраических уравнений (СЛАУ) и оформите исходные данных и решение по образцу. 0,9x + 4,9y - 6,6z = 0,9 2,6x - 1,8y + 0,4z = 0,3 0,5x + 3,8y - 0,4z = 2,7. Ответ: x=0,5235; y=0,6886; z=0,4463.
Реферат
Пояснительная записка к отчету по учебной практике содержит 18 страниц, 1 таблица, 9 рисунков, 2 листинга, 2 использованных источника.
Microsoft Word, Microsoft Excel, стиль, макрос, диаграмма, гистограмма, таблица, график функции, стандарт.
Объектом учебной практики являются программы Microsoft Office.
Цель учебной практики - изучить стандарты предприятия, овладеть навыками использования приложений Microsoft Office, научиться применять набор операций, содержащийся в исходных программах.
Результатом работы являются выполненные задания учебной практики.
Пояснительная записка выполнена в текстовом редакторе Microsoft Word 2010.
Содержание
Введение
1. Microsoft Word
1.1 Выполнение работы
2. Microsoft Excel
2.1 Выполнение работы
Заключение
Библиографический список
Введение
Приложения Word и Excel входят в состав всех выпусков офисного пакета Microsoft Office.
Microsoft Word - текстовый процессор, предназначенный для создания, просмотра и редактирования текстовых документов, с локальным применением простейших форм таблично-матричных алгоритмов. Выпускается корпорацией Microsoft в составе пакета Microsoft Office. Продукт занимает ведущее положение на рынке текстовых процессоров. Редактор позволяет автоматизировать настройку шрифтов, абзацев, нумерацию, оглавление и другие элементы текста с помощью стилей и макросов.
Microsoft Excel - табличный процессор, предназначенный для обработки и анализа цифровой информации средствами вычислительной техники. Поддерживает все необходимые функции для создания электронных таблиц любой сложности. Microsoft Excel входит в состав Microsoft Office и на сегодняшний день Excel является одним из наиболее популярных приложений в мире. Приложение предоставляет возможности экономико-статистических расчетов, а также графические инструменты.
1 Microsoft Word
Microsoft Word обеспечивает простое и удобное форматирование текстового файла за счет продуманных инструментов и понятного интерфейса. Благодаря широкому спектру функций текстовый процессор Microsoft Word напоминает настольную издательскую систему.
В данном блоке учебной практики были сформированы навыки оформления учебной документации с использованием программы Microsoft Word.Была проведена работа с текстом, таблицами, рисунками, формулами, объектами. Использованы шаблоны, стили оформления, виды форматирования текста в Microsoft Word, стандарты оформления текстовых документов - СТП ОмГУПСа.
1.1 Выполнение работы
Код макросов «Вставка_таблицы» и «Вставка_формулы» представлены на листингах 1.1 и 1.2.
Sub Вставка_таблицы1()
Вставкатаблицы1 Макрос
ActiveDocument.Tables.Add Range:=Selection.Range, NumRows:=2, NumColumns:= _
1, DefaultTableBehavior:=wdWord9TableBehavior, AutoFitBehavior:= _
wdAutoFitFixed
With Selection.Tables(1)
If .Style <> "Сетка таблицы" Then
Style = "Сетка таблицы"
End If
ApplyStyleHeadingRows = True
ApplyStyleLastRow = False
ApplyStyleFirstColumn = True
ApplyStyleLastColumn = False
ApplyStyleRowBands = True
ApplyStyleColumnBands = False
End With
Selection.Style = ActiveDocument.Styles("Название таблицы")
Selection.TypeText Text:="Таблица"
Selection.MoveDown Unit:=wdLine, Count:=1
Selection.Style = ActiveDocument.Styles("Таблица")
Selection.Borders(wdBorderTop).LineStyle = wdLineStyleNone
Selection.Borders(wdBorderLeft).LineStyle = wdLineStyleNone
Selection.Borders(wdBorderBottom).LineStyle = wdLineStyleNone
Листинг 1.1 - Код макроса "Вставка таблицы", Лист 1
Selection.Borders(wdBorderRight).LineStyle = wdLineStyleNone
Selection.Borders(wdBorderDiagonalDown).LineStyle = wdLineStyleNone
Selection.Borders(wdBorderDiagonalUp).LineStyle = wdLineStyleNone
Selection.MoveUp Unit:=wdLine, Count:=1
Selection.Borders(wdBorderTop).LineStyle = wdLineStyleNone
Selection.Borders(wdBorderLeft).LineStyle = wdLineStyleNone
Selection.Borders(wdBorderBottom).LineStyle = wdLineStyleNone
Selection.Borders(wdBorderRight).LineStyle = wdLineStyleNone
Selection.Borders(wdBorderDiagonalDown).LineStyle = wdLineStyleNone
Selection.Borders(wdBorderDiagonalUp).LineStyle = wdLineStyleNone
End Sub
Листинг 1.1 - Код макроса "Вставка таблицы", Лист 2
Sub вставка_формулы1()
вставкаформулы1 Макрос
ActiveDocument.Tables.Add Range:=Selection.Range, NumRows:=1, NumColumns:= _
3, DefaultTableBehavior:=wdWord9TableBehavior, AutoFitBehavior:= _
wdAutoFitFixed
With Selection.Tables(1)
If .Style <> "Сетка таблицы" Then
Style = "Сетка таблицы"
End If
ApplyStyleHeadingRows = True
ApplyStyleLastRow = False
ApplyStyleFirstColumn = True
ApplyStyleLastColumn = False
ApplyStyleRowBands = True
ApplyStyleColumnBands = False
End With
Selection.Borders(wdBorderTop).LineStyle = wdLineStyleNone
Selection.Borders(wdBorderLeft).LineStyle = wdLineStyleNone
Selection.Borders(wdBorderBottom).LineStyle = wdLineStyleNone
Selection.Borders(wdBorderRight).LineStyle = wdLineStyleNone
Selection.Borders(wdBorderDiagonalDown).LineStyle = wdLineStyleNone
Selection.Borders(wdBorderDiagonalUp).LineStyle = wdLineStyleNone
Selection.MoveRight Unit:=wdCharacter, Count:=1
Selection.Borders(wdBorderTop).LineStyle = wdLineStyleNone
Selection.Borders(wdBorderLeft).LineStyle = wdLineStyleNone
Selection.Borders(wdBorderBottom).LineStyle = wdLineStyleNone
Selection.Borders(wdBorderRight).LineStyle = wdLineStyleNone
Selection.Borders(wdBorderDiagonalDown).LineStyle = wdLineStyleNone
Selection.Borders(wdBorderDiagonalUp).LineStyle = wdLineStyleNone
Selection.MoveRight Unit:=wdCharacter, Count:=1
Selection.Borders(wdBorderTop).LineStyle = wdLineStyleNone
Selection.Borders(wdBorderLeft).LineStyle = wdLineStyleNone
Selection.Borders(wdBorderBottom).LineStyle = wdLineStyleNone
Selection.Borders(wdBorderRight).LineStyle = wdLineStyleNone
Selection.Borders(wdBorderDiagonalDown).LineStyle = wdLineStyleNone
Selection.Borders(wdBorderDiagonalUp).LineStyle = wdLineStyleNone
Selection.SelectCell
Selection.ParagraphFormat.Alignment = wdAlignParagraphRight
Selection.Cells.VerticalAlignment = wdCellAlignVerticalCenter
Листинг 1.2 - Код макроса "Вставка формулы", Лист 1
Selection.MoveLeft Unit:=wdCharacter, Count:=2
Selection.SelectCell
Selection.ParagraphFormat.Alignment = wdAlignParagraphCenter
Selection.Cells.VerticalAlignment = wdCellAlignVerticalCenter
Selection.InlineShapes.AddOLEObject ClassType:="Equation.3", FileName:="", _
LinkToFile:=False, DisplayAsIcon:=False
Selection.MoveRight Unit:=wdCharacter, Count:=1
Selection.Fields.Add Range:=Selection.Range, Type:=wdFieldEmpty, Text:= _
"LISTNUM \s 1 ", PreserveFormatting:=False
Selection.MoveLeft Unit:=wdCharacter, Count:=1
With ListGalleries(wdNumberGallery).ListTemplates(1).ListLevels(1)
NumberFormat = "(2.%1)"
TrailingCharacter = wdTrailingTab
NumberStyle = wdListNumberStyleArabic
NumberPosition = CentimetersToPoints(0.63)
Alignment = wdListLevelAlignLeft
TextPosition = CentimetersToPoints(1.27)
TabPosition = wdUndefined
ResetOnHigher = 0
StartAt = 1
With .Font
Bold = wdUndefined
Italic = wdUndefined
StrikeThrough = wdUndefined
Subscript = wdUndefined
Superscript = wdUndefined
Shadow = wdUndefined
Outline = wdUndefined
Emboss = wdUndefined
Engrave = wdUndefined
AllCaps = wdUndefined
Hidden = wdUndefined
Underline = wdUndefined
Color = wdUndefined
Size = wdUndefined
Animation = wdUndefined
DoubleStrikeThrough = wdUndefined
Name = ""
End With
LinkedStyle = ""
End With
ListGalleries(wdNumberGallery).ListTemplates(1).Name = "equation"
Selection.Range.ListFormat.ApplyListTemplateWithLevel ListTemplate:= _
Листинг 1.2 - Код макроса "Вставка формулы", Лист 2
ListGalleries(wdNumberGallery).ListTemplates(1), ContinuePreviousList:= _
False, ApplyTo:=wdListApplyToWholeList, DefaultListBehavior:= _
wdWord10ListBehavior
Selection.MoveLeft Unit:=wdCharacter, Count:=1
Selection.MoveRight Unit:=wdCharacter, Count:=1
Selection.TypeBackspace
Selection.TypeBackspace
Selection.MoveRight Unit:=wdCharacter, Count:=1
Selection.TypeBackspace
Selection.TypeBackspace
Selection.TypeBackspace
Selection.TypeBackspace
Selection.TypeBackspace
Selection.TypeBackspace
Selection.TypeBackspace
Selection.Paragraphs(1).SelectNumber
Selection.TypeBackspace
Selection.MoveRight Unit:=wdCharacter, Count:=1
Selection.MoveLeft Unit:=wdCharacter, Count:=2
Selection.MoveRight Unit:=wdCharacter, Count:=1
Selection.Fields.Add Range:=Selection.Range, Type:=wdFieldEmpty, Text:= _
"LISTNUM equation ", PreserveFormatting:=False
Selection.MoveLeft Unit:=wdCharacter, Count:=2
Листинг 1.2 - Код макроса "Вставка формулы", Лист 3
Результат использования макроса «Вставка_формулы» (например формула 1.1.)
(1.1)
Результат использования макроса «Вставка_таблицы» представлен на таблице 1.1.
Результат использования макроса «Вставка_рисунка» представлен на рисунке 1.1.
Рисунок 1.1 - ОмГУПС
2. Microsoft Excel
Microsoft Excel является широко распространенной компьютерной программой, с помощью которой производятся расчеты, составляются таблицы и диаграммы, вычисляются простые и сложные функции. По своей сути Microsoft Excel - это большая таблица, предназначенная для внесения в нее данных.
В данном блоке учебной практики были сформированы навыки применения электронных таблиц для решения разнообразных технических и экономических задач. Изучены принципы работы с электронными таблицами в Microsoft Excel и их основные функции: формулы, сортировка и фильтрация данных.
2.1 Выполнение работы
Результат выполнения задания по построению двумерного графика эпициклоиды по параметрическим уравнениям кривой представлен на рисунке 2.1.
Рисунок 2.1 - График эпициклоиды
Результат выполнения задания моделирования ситуации, описанной в былине про Илью Муромца, в которой перед богатырем ставится задача выбрать одну из трех дорог, представлен на рисунке 2.2.
Рисунок 2.2 - Выбор пути
Результаты построения диаграмм по таблице начисления заработной платы представлены на рисунках 2.3 - 2.5.
Рисунок 2.3 - Гистограмма начисленных денег
Рисунок 2.4 - Гистограмма отработанных часов
Рисунок 2.5 - Гистограмма среднего значения
График начисления заработной платы показан на рисунке 2.6.
Рисунок 2.6 - График начислений
Результат построения графика функции f(x)=3x+sin(x)-x^2-2 и нахождения корня уравнения, с помощью подбора параметра, по 11-ти точкам на отрезке [-1; 2], также нахождение корня уравнения f(x)=0, при начальном приближении х=0.5, представлен на рисунке 2.7.
Рисунок 2.7 - График функции и нахождение корня
Результат решения системы линейных алгебраических уравнений (СЛАУ) представлен на рисунке 2.8.
Рисунок 2.8 - Решение СЛАУ
Заключение
В ходе выполнения заданий учебной практики были использованы современные информационные технологии для решения задач обработки информации. Были отработаны навыки работы с программными средствами информационного и программного обеспечения.
Выработаны умения анализировать информацию, ставить цели и выбирать пути их достижения, логически верно и ясно строить письменную речь, использовать принятые на предприятии нормы и правила при оформлении текстовых документов.
Приобретены практические навыки работы на персональных компьютерах с использованием современных пакетов прикладных программ электронного документооборота Microsoft Office.
Библиографический список
1. СТП ОмГУПС - 1.2-2005: Работы студенческие учебные и выпускные квалификационные.
2. Стоцкий Ю.А. Microsoft Office 2010. Самоучитель: Пособие/ Ю.А. Стоцкий, А.А. Васильев, И.С. Телина. СпБ.: Питер, 2011. 432с.