Программирование алгоритмов разветвляющейся структуры

2.1. Цель работы: изучение методов алгоритмизации и программирования алгоритмов разветвляющейся структуры.

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

Операторы разветвляющейся структуры (принятия решений) позволяют выполнять группы инструкций в зависимости от определенного условия. В VBA для принятия решения используется инструкция If…Then…Else.

Инструкция If…Then…Else задает выполнение определенных групп инструкций в зависимости от значения выражения.

Ее синтаксис приведен ниже:

If Условие Then Инструкции [Else Инструкции_else]

Допускается также использование блоковой формы синтаксиса:

If Условие Then

[Инструкции]

[Else

Инструкции_else]

End If

После выполнения инструкций, следующих за Then или Else, происходит передача управления на инструкцию, расположенную непосредственно за End If.

Допускается использование вложенных блоков инструкций If.

ПРИМЕР.

Пусть требуется написать программу для вычисления функции, заданной формулой:

Очевидно, что функция имеет два условия. Поэтому следует использовать условный оператор If…Then…Else.

Текст программы для расчета этой функции следующий:

Function Y(x)

If x < 0 Then

Y = Abs(x) / (1 + x ^ 2) * Exp(-2 * x)

Else

If x < 1 Then

Y = Sqr(1 + x ^ 2)

Else

Y = (1 + Sin(x)) / (1 + x ^ 2) + 3 * x

End If

End If

End Function

Аналогично можно организовать вложенность любого числа If.

Задание для самостоятельного выполнения.

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

Вариант 1

1. Построить в разных системах координат при хÎ[-2; 1,5] графики функций:

·

·

·

Вариант 2

1. Построить в разных системах координат при хÎ[-1,5; 1,5] графики функций:

·

·

·

Вариант 3

1. Построить в разных системах координат при хÎ[-1,8; 1,8] графики функций:

·

·

·

Вариант 4

1. Построить в разных системах координат при хÎ[-2; 1,8] графики функций:

·

·

·

Вариант 5

1. Построить в разных системах координат при хÎ[-1,7; 1,5] графики функций:

·

·

·

Вариант 6

1. Построить в разных системах координат при хÎ[-1,5; 1,8] графики функций:

·

·

·

Дата добавления: 2015-07-08