Выражения, записанные на языке Visual Basic

№ п/п	Выражение
	Z = SIN(X) + (Y + A ^ 2) / 3E – 8
	Z = TAN(2E7 * A) ^ 3 / B + 3 * X
	Z = COS(X2 + Y2) ^ 2 / SQR(X2) / 2E – 3
	Z = TAN(X) / X1 ^ 3 + 4.7 / 2E – 2 + X
	Z = EXP(A + B) + ABS(SIN(A – X) ^ 2)
	Z = (T1 ^ 3 + T2 ^ 4) / SIN(X ^ 2) ^ 3 – 2E3
	Z = (SIN(X ^ 4) – 1) ^ 2 / SQR(X) – 4E – 3
	Z = SIN(X ^ 3 / 2.2) / 7.2 / 2E – 3 + X ^ 2
	Z = 1.2E – 3 * SIN(COS(A + 4) ^ 4) ^ 3
	Z = G1 + G2 * G2 * ABS(SIN(4 * X ^ 2) – 2)
	Z = SQR(SIN(X) ^ 3 + SIN(A ^ 3)) / 9.1
	Z = 15E6 * COS(ABS(M / N)) / M + 2
	Z = SIN(X ^ 2) / SIN(X * 2) + 2E5 / X ^ 5
	Z = LOG(ABS(SIN(X) + COS(Y)) – X / 2)
	Z = 2.1 * TAN(TAN(X) * B / 2E2)
	Z = 2.5 / 3 * EXP(X) / LOG(X + 2E – 3) ^ 2
	Z = 13E – 4 * LOG(X1 / X2 ^ 4 – 5) – 38 * X1
	Z = ABS(SIN(X1) ^ 2 / EXP(X2) – 5E – 4)
	Z = COS(SIN(W1 / T1) / 3.45) * F / 2E – 4
	Z = COS(X) + ABS(A – SQR(Y ^ 4) / 8E3)
	Z = ATN(7E2 * A ^ (1 / 3)) ^ 3 / X – 3 * B
	Z = COS(2 * X) / ABS(SQR(A – B) – 4E6) + 1
	Z = SIN(X1 + Y1) ^ (1 / 5) / SQR(Y1) / X1 * 5E5
	Z = ATN(X ^ 3) / X ^ 3 +3.8 ^ 6E2 / 6E – 2 + X
	Z = SIN(SQR(X + 0.39 * X ^ 2) – ABS(X)) + 3
	Z = 5.3 * EXP(X + Y) * ABS(SIN(X – Y)) + X ^ 2
	Z = 1.7E – 9 / (T ^ 2 + COS(T)) + 1.8E8 * SIN(T)
	Z = LOG(SIN(ABS(SQR(EXP(X) – Y) + 1) – X) + 1)

Задание 3.

В тетрадь для лабораторных работ запишите следующие арифметические выражения, приведенные в табл. 1.2, на языке Visual Basic.

Таблица 1.2

Арифметические выражения

	№ п/п	Выражение	№ п/п	Выражение

Задание 4.

Составить и набрать программу вычисления значений для всех функций приведенных в табл. 1.3. Вычислить значения z при x = 5 и сравнить результаты с ответами. Предусмотреть ввод x с помощью функции InputBox, а вывод на рабочий лист Excel – с помощью оператора Cells().

Таблица 1.3

Арифметические выражения

№ п/п	Выражение	Ответ
		z = – 0,135
		z = 13,110
		z = 0,487
		z = 2,443
		z = 7,423

Задание 5.

Вычислить выражения:

; ,

где x = 3,981; y = –1,22; z = 0,512.

Ввод данных выполнить с помощью оператора присваивания, вывод значений выражений – в разных диалоговых окнах с помощью функции MsgBox.

Задание 6.

Вычислить математические выражения:

; ,

где х = 1,426; y= –1,625; z = 3,5.

Ввод данных выполнить с помощью функции InputBox, вывод – на рабочий лист Excel.

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

ПРОГРАММИРОВАНИЕ АЛГОРИТМОВ ЛИНЕЙНОЙ СТРУКТУРЫ

Цель работы: изучение особенностей разработки алгоритмов линейной структуры, ввода и вывода данных на лист рабочей книги Excel.

2.1. Краткие теоретические сведения

В VBA для записи линейных алгоритмов используется оператор прис-ваивания. Оператор присваивания имеет следующий вид:

переменная = выражение.

Выражение может быть арифметическим, текстовым или логическим.

Пример.

Заданы два целых числа. Вычислить их сумму, произведение и частное.

Программный код:

Option Explicit

Sub PR1 ()

Dim a As Integer, b As Integer ' описание переменных

Dim s As Integer, p As Integer

Dim ch As Double

a = Val(InputBox("Введите А")) ' ввод первого числа

b = Val(InputBox("Введите В")) ' ввод второго числа

s = a + b ' вычисление суммы

MsgBox ("сумма=" & s) ' вывод суммы

p = a * b ' вычисление произведения

MsgBox ("произведение=" & p) ' вывод произведения

ch = a / b ' вычисление частного

MsgBox ("частное=" & ch) ' вывод частного

End Sub

Для пояснения в программе предусмотрены комментарии. Комментарии начинаются с символа «'» (апостроф), т. е. все, что написано в строке программного кода справа от апострофа, считается комментарием.

При записи нескольких операторов в одну строку их разделяют
двоеточием.