73163

Разработка программ в среде Visual Basic

Лабораторная работа

Информатика, кибернетика и программирование

Записать процедуру для вычисления значения ступенчатой функции Z для заданного варианта. Предусмотреть запуск программы из среды Word и возможности ввода значения переменной x из диалогового окна InputBox, а также вывод значения Z в панели сообщения MsgBox.

Русский

2014-12-05

83.61 KB

3 чел.

Министерство образования Российской Федерации

Пензенский государственный университет

Кафедра «Электротехника и транспортное электрооборудование»

ОТЧЁТ
по лабораторной работе №2
по курсу «Компьютерные технологии»
на тему «
Разработка программ в среде Visual Basic»

                                              Выполнил :

студент группы 14еэ2

Мишанин Кирилл

                                          Приняла:

Регеда О. Н.

Вариант № 1

  1.  Записать процедуру для вычисления значения ступенчатой функции Z  для заданного варианта. Предусмотреть запуск

программы из среды Word и возможности ввода значения переменной x из диалогового окна InputBox ,а также вывод

значения Z в панели сообщения MsgBox.

Составим программу:

Sub Макрос1 ()

x = InputBox ("x=", "Введите значение")

If x < 0 Then Z =10.5 * x ^ 3 + 1

If 0 < x < 1 Then Z = 5(x + 1) ^ 3

If x >= 1 Then Sqr (x^2 + 10) 

MsgBox Z

End Sub

Скрин программы.

Запустим созданный макрос и введём переменную х=7:

Получим результат Z= 2560

  1.  Записать процедуру , запускаемую из Word, для вычисления и вывода на панель сообщений MsgBox значений функции для заданного варианта.

Значения x меняются от -20 до 20 с шагом 2.

Для организации циклов в одной процедуре испозовать оператор 1) ForNext , а в другой процедуре – оператор 2) WhileWend.

Вывести полученные результаты 1) с точностью один знак после запятой на панели сообщений в одну сторону строку для первой процедуры и 2) в отдельной панели сообщений для второй процедуры.

Составим программу:

Sub Макрос2()

n = InputBox("Введём значение n")

n = Val(n)

For x = -20 To 20 Step 2

A = 0

For n = 1 To 5

A = A + (1000 * n + x ^ 4) ^ 0.5

A = Round(A, 1)

Next n

MsgBox "x=" + CStr(x) + "A=" + CStr(A)

Next x

End Sub

Введём значение n =1

Результат:

От  до


3.
Составить процедуру , запускаемую из Word , для вычисления и вывода на панель сообщений MsgBox наибольшего и наименьшего значения функции для заданного варианта из таблицы и значение аргумента при котором оно получено.

Sub Макрос3()

Max = 0

Min = 0

For x = 0 To 360 Step 10

Y = -Sin(x / 2)

Y = Round(Y, 3)

If Y > Max Then Max = Y

If Y < Min Then Min = Y

Next x

MsgBox "Max =" + CStr(Max) + "Min=" + CStr(Min)

End Sub

Результат :

Вывод: в ходе лабораторной работы я научился использовать операторы InputBox и MsgBox.


 

А также другие работы, которые могут Вас заинтересовать

27121. Подходы к менеджменту: системный, ситуационный, процессный 27.98 KB
  В системном подходе подчеркивается что руководители должны рассматривать организацию как совокупность взаимосвязанных элементов таких как люди структура задачи и технология которые ориентированы на достижение различных целей в условиях меняющейся внешней среды. Закрытая система имеет жесткие фиксированные границы ее действия относительно независимы от среды окружающей системы. На входе организация получает от окружающей среды информацию капитал человеческие ресурсы и материалы. Внутрифирменное управление и управление фирмой как...
27122. Теория иерархии потребностей А.Маслоу 35.34 KB
  Маслоу предположил что все потребности человека врожденные или инстинктоидные и что они организованы в иерархическую систему приоритета или доминирования. Физиологические потребности являются необходимыми для выживания. Они включают в себя потребности в еде воде убежище отдыхе и сексуальные потребности. Потребности в безопасности и уверенности в будущем включают потребности в защите от физических и моральных опасностей со стороны окружающей среды и уверенность в том что физиологические потребности будут удовлетворены в будущем.
27123. Сбытовая политика 27.98 KB
  Сервис предоставление услуг Основные функции сбыта это: коммерческие содействуют куплепродаже товара и осуществлению передачи прав собственности: установление контакта действия по передаче товара оформлению заказов организации платёжнорасчетных операций передаче прав собственности на товар; информирование – сбор информации о покупателях конкурентах о рынке в целом информирование потребителя о товаре и фирме.; складирование и хранение продукции Посредники выполняют функции сбыта с меньшими издержками т. Канал распределения...
27124. Анализ достоинств и недостатков структур управления позволяет найти критерии их оптимального использования 38.42 KB
  Область применения функциональной структуры – это однопродуктовые предприятия; предприятия реализующие сложные и длительные инновационные проекты; средние узкоспециализированные предприятия; научноисследовательские и проектноконструкторские организации; крупные специализированные предприятия табл. Дивизиональная оргструктура Область применения – это многопрофильные предприятия; предприятия с расположением в различных регионах; предприятия осуществляющие сложные инновационные проекты. Таким образом каждая из структур имеет ряд достоинств и...
27125. Сущность планирования 14.63 KB
  Формированию ассортимента предшествует разработка предприятием ассортиментной концепции – построение оптимальной ассортиментной структуры товарного предпочтения учитывающих с одной стороны потребительские требования определенных сегментов а с другой стороны необходимость рационального использования предприятием ресурсов в целях снижения издержек. Иногда целесообразно создать отдел главной задачей которого было бы принятие принципиальных решений относительно ассортимента. Характеристика товарного ассортимента включает в себя: широту –...
27126. Функции планирования и система планов организации. Механизмы планирования: традиционный, сводный, целевой и адаптивный. Бизнес-план 116.21 KB
  Функции планирования и система планов организации. Механизмы планирования: традиционный сводный целевой и адаптивный. Бизнесплан В рамках функции планирования выделяют следующие подфункции: 1. Выполняемые подфункции планирования тесно связаны как между собой так и с выполнением других макрофункций организации.
27127. Цели и функции управления, их классификация. Управленческий цикл 14.7 KB
  Управленческий цикл Классификация целей управления: по содержанию например экономические социальные политические идеологические научнотехнические; по уровням управления общегосударственный отраслевой межотраслевой территориальный и локальный. Классификация функций органов управления: основные предметные функции для осуществления которых образован соответствующий орган исполнительной власти государственного управления; обеспечивающие – функции которые необходимы для успешной реализации предметных функций. Для осуществления...
27128. Функции управления. Управленческие циклы 198.5 KB
  Функции управления. Функция управления определенный вид управленческой деятельности который либо осуществляется достаточно регулярно и часто либо данный вид работ выполняется нерегулярно но их результаты имеют существенные последствия для организации. Я ПОДУМАЮ это определение слова функция Функции управления исходя из их роли в управлении предприятием делят на: 1. Классическим делением функций управления на подфункции является их деление по стадиям управленческого цикла.
27129. Ценовая политика 34 KB
  Ценовая политикаэто определение и поддержание на оптимальном уровне цен на товары с учетом их взаимосвязи в рамках ассортимента в условиях конкретного рынка а также своевременное изменение цен по товарам и рынкам для достижения максимально возможного успеха в конкретной рыночной ситуации. Структура ценовой политики: исходное ценообразование на товар ценообразование в рамках товарной номенклатуры изменение цены контроль за уровнем наценок устанавливаемых посредником создание барьеров по удержанию покупателей разработка программ...