Задание. Написать программу для вычисления значения функции с использованием операторов ветвления If и выбора Select Case.

1) 2)

3) 4)

5) 6)

7) 8)

9) 10)

11) 12)

13) 14)

15) 16)

17) 18)

19) 20)

21) 22)

23) 24)

25)

Пример выполнения задания. Функция изображена на рис. 3.

Рис. 3. График функции

При вычисление осуществляется по формуле . При — по формуле . В противном случае . Унарный минус перед квадратным корнем появляется потому, что полуокружность лежит в нижней полуплоскости.

Значение R является константой, примем её равной 2. Входными данными является величина x. Результат работы программы будет находиться в переменной y.

При реализации на языке VB в форму помещены 3 элемента управления: кнопка Command1 (для запуска процесса вычислений), строка ввода Text1 (для ввода x) и метка Label1 (для вывода y).

Пример реализации программы

Первый вариант (с использованием конструкции If)

Private Sub Command1_Click()

Dim x As Double ' входные данные

Dim y As Double ' результат

Const R = 2

x = CDbl(Text1.Text)

If x < – R Then

y = x + R

ElseIf x > R Then

y = 1

Else

y = – Sqr(R ^ 2 – x ^ 2)

End If

Label1.Caption = CStr(y)

End Sub

Второй вариант (с использованием конструкции Select Case)

Private Sub Command1_Click()

Dim x As Double ' входные данные

Dim y As Double 'результат

Const R = 2

x = CDbl(Text1.Text)

Select Case x

Case Is < – R

y = x + R

Case – R To R

y = – Sqr(R ^ 2 – x ^ 2)

Case Is > R

y = 1

End Select

Label1.Caption = CStr(y)

End Sub

Контрольные вопросы

1. Оператор условия If и его разновидности (If … End If, If … Else … End If, If … ElseIf … Else … End If).

2. Оператор множественного выбора Select Case.

3. Логический тип Boolean и операции над переменными этого типа.

4. Операции над величинами логического типа.

5. Операции отношений.

Контрольная работа. Задание 3

Оператор цикла с параметром

Цель работы: Изучить оператор цикла с параметром For.

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

Многократное выполнение одного или нескольких операторов программы обеспечивается использованием циклов.

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

For <счетчик>=<начальное значение> To <конечное значение> [Step <шаг>]

<Операторы>

Next [счетчик]

Г рафический способ изображения цикла с параметром приведен на рис. 4.

Рис. 4. Изображение цикла с параметром на схеме алгоритма

Порядок работы цикла For:

1) Переменной счетчик присваивается начальное значение (НЗ).

2) Проверяется условие: счетчик конечного значения (КЗ) (при положительном значении шага) или счетчик конечного значения (при отрицательном значении шага). Если результат проверки условия истина, то выполняется тело цикла. В противном случае происходит передача управления на первый оператор, стоящий после цикла (т.е. выход из цикла).

3) После выполнения тела цикла переменная <счетчик> изменяется на величину шага (если величина шага не указана, то по умолчанию счетчик увеличивается на 1).

4) Переход к пункту 2

Для вывода на форму используют оператор Print.

Оператор Print x, y выведет на форму значения переменных x и y, а оператор Print “Сумма=”, S — выведет на форму Сумма=, а затем значение, хранящееся в переменной S.

Задание 1. С использованием оператора цикла For вычислить значения выражений, заданных ниже. x— произвольное число, определенное в программе.

1.

2.

3.

4.

5.

6.

7.

8.

9.

10.

11.

12.

13.

14.

15.

16.

17.

18.

19.

20.

21.

22.

23.

24.

25.

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

1) Вычислить значения табличной функции для всех значений аргумента на интервале [–3,  3] с шагом 0,2. Результат выдать на экран в виде таблицы.

2) Программно найти самую левую на интервале [–2, 2] (с точностью 0,1) точку, в которой значение функции принимает отрицательное значение, и самую правую точку на том же интервале, в которой значение функции принимает положительное значение.

Пример выполнения задания 1

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

(1)

В переменной x хранятся входные данные, в переменной y — результат вычисления выражения.

Для вычисления выражения сначала необходимо вычислить cos(x), затем cos(2x), и т.д., в последнюю очередь — cos(99x).

Выражение (1) можно записать в виде последовательности однотипных рекуррентных выражений

; ; ;

В общем, виде можно записать

, где ; .

В связи с этим организуем цикл For с изменением счетчика от 1 до 99 с шагом 1.