Полезное:
Как сделать разговор полезным и приятным
Как сделать объемную звезду своими руками
Как сделать то, что делать не хочется?
Как сделать погремушку
Как сделать так чтобы женщины сами знакомились с вами
Как сделать идею коммерческой
Как сделать хорошую растяжку ног?
Как сделать наш разум здоровым?
Как сделать, чтобы люди обманывали меньше
Вопрос 4. Как сделать так, чтобы вас уважали и ценили?
Как сделать лучше себе и другим людям
Как сделать свидание интересным?
Категории:
АрхитектураАстрономияБиологияГеографияГеологияИнформатикаИскусствоИсторияКулинарияКультураМаркетингМатематикаМедицинаМенеджментОхрана трудаПравоПроизводствоПсихологияРелигияСоциологияСпортТехникаФизикаФилософияХимияЭкологияЭкономикаЭлектроника
|
Теоретическая часть. Наименование раздела 1.1 по вариантуНаименование раздела 1.1 по варианту Наименование подраздела 1.1.1 Текст………………. Наименование раздела 1.2 по варианту Наименование подраздела 1.2.1 Текст ……………. Наименование подраздела 1.2.2 Текст ………………….:
· Практическая часть Задача 1 Для выполнения задания на рабочем листе Excel введем исходные данные для вычислений, а также добавим элемент управления «Кнопка». Рисунок 2.1 – Вид рабочего листа Excel
Дважды нажмем на созданную кнопку, после чего в редакторе Visual Basic напишем код макроса, запускаемого по нажатию кнопки: Private Sub CommandButton1_Click() Dim a As Double Dim b As Double Dim c As Double Dim x As Double Dim y As Double Dim PI As Double
a = Range("B2").Value b = Range("B3").Value c = Range("B4").Value PI = 4 * Atn(1) If b <= a - 1 Then x = c + a * b Else x = c - a * b End If
If x < 3 Then y = a + Abs(c * x) ^ (1 / 2) ElseIf x <= 5 Then y = b + Sin(PI * x) Else y = c - Cos(a * x) End If Range("B8").Value = x Range("B9").Value = y End Sub
Рисунок 2.2 – Результат выполнения макроса
|