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.


 

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

22360. Конформные отображения. Понятие конформного отображения 1.86 MB
  Предположим что задано непрерывное и взаимно однозначное отображение области D на некоторую область . Геометрически эта замена равносильна замене отображения отображением 3 которое называется главной линейной частью отображения 1. Отображение 3 можно переписать в виде 4 где: 5 не зависят от x и y. Отображение 4 представляет собой так называемое линейное аффинное преобразование плоскости .
22361. Преобразование Лапласа и ее доказательство 382 KB
  Это утверждение вытекает непосредственно из неравенства. Отсда следует, что, если, оставаясь внутри любого угла , где сколь угодно мало, причем эта сходимость равномерна относительно. Если, в частности, аналитическая...
22362. Свойства преобразования Лапласа 1.75 MB
  2 Изображения аналитичны не только в области но и всюду кроме . В дальнейшем будем обозначать через оригиналы их изображения: 3 Непосредственно из свойств интегралов получаем: I. линейное пространство функцииоригинала с показателем роста изоморфно пространству изображения. Переходя к изображениям и интегрируя по частям получим .
22363. Основной принцип теории пределов 635.5 KB
  Существует одна и только одна точка которая принадлежит всем отрезкам данной последовательности. Следовательно двух точек общих всем отрезкам нашей последовательности существовать не может; существование же одной такой точки доказано в теории иррациональных чисел. Существует единственная точка принадлежащая всем прямоугольникам данной последовательности. Пусть имеется бесконечная последовательность комплексных чисел 1 Число z называется предельным числом последовательности 1 если...
22364. Дробно-линейные отображения 824.5 KB
  Отображение инверсия преобразование симметрии относительно единичной окружности. Вообще точки и называют симметричными относительно окружности : если 1 они лежат на одном луче проходящем через точку 2 Преобразование переводящее каждую точку плоскости в точку симметричную относительно окружности называют симметрией относительно этой окружности или инверсией. Докажем основное свойство симметричных точек: Точки и тогда и только тогда являются симметричными относительно окружности когда они являются вершинами пучка...
22365. Расширенная комплексная плоскость 2.74 MB
  непрерывны функции и то ее графиком является некоторая кривая на комплексной плоскости. Тогда говорят что задана непрерывная кривая или просто кривая: 1 а уравнение 1 называют параметрическим уравнением этой кривой. Пусть кривая задана уравнением 1. вопервых кривая является упорядоченным множеством точек вовторых различным точкам кривой может отвечать одна и та же точка плоскости: если t = t при tt то точки z= t и z=t...
22366. Понятие сходящегося и расходящегося ряда 227.5 KB
  Понятие сходящегося и расходящегося ряда. Рассмотрим бесконечный ряд: 1 все члены ряда комплексные числа образуем ∑ первых n членов этого ряда: 2 Давая n значения 123 мы получим бесконечную последовательность комплексных чисел S1S2Snсоответствующего ряда 1 . Обратно зная последовательность чисел Sn легко написать соответствующий ей ряд: S1S2S1SnSn1 Говорят что ряд 1 сходится если соответствующая ему последовательность чисел Sn сходится в этом случае суммой ряда 1 называют предел указанной...
22367. Функции комплексной переменной 202.5 KB
  Областью на комплексной плоскости называют множество D точек обладающее следующими свойствами: Вместе с каждой точкой из D этому множеству принадлежит и достаточно малый круг с центром в этой точке свойство открытости. Простыми примерами областей могут служить окрестности точек на комплексной плоскости. Говорят что на множестве M точек плоскости z задана функция w=fz 1 если указан закон по которому каждой точке zM...
22368. Схемы включения и характеристики биполярных транзисторов 465.5 KB
  Схемы включения БТ. Эквивалентные схемы БТ. Эквивалентные схемы БТ. Схемы включения БТ и их показатели.