
- •Общие сведения
- •Лабораторная работа №1. Программирование с использованием встроенных функций ввода/вывода
- •Теоретические разделы для выполнения лабораторной работы
- •Задание
- •Структура программы.
- •Часть 1.
- •Часть 2.
- •Лабораторная работа №3. Программирование разветвляющихся вычислительных процессов с использованием операторов If и Select Case.
- •Теоретические разделы для выполнения лабораторной работы
- •Задание
- •Часть 1.
- •Часть 2.
Структура программы.
Основные арифметические и математические операции и функции языка программирования.
Структура логического оператора If.
Задание
Вычислить значение выражения. Варианты заданий указаны в приложении 2, с. 8. Исходные данные задать самостоятельно.
Часть 1.
Программирование линейных вычислительных процессов
Вычислить выражение без учета области допустимых значений.
Часть 2.
Программирование разветвляющихся вычислительных процессов
Вычислить выражение с учетом области допустимых значений.
Пример
Вычислить выражение
Метод разделения на части состоит в следующем: исходное выражение разбиваем на элементарные части, например
a = y^(-Sqr(Abs(x)))
b = (Sin(x) + E^(x + y))
c = Sqr((2 * Cos(x) ^ 2 + 3) / 5 * Sin(x))
После разбиения на части расчетная формула имеет следующий вид:
K = Log(a) * b + c
ОДЗ
y>0 x>0
Текст программы (Часть 2, с учетом ОДЗ)
Sub Popov2()
Dim x, y, a, b, c As Double
x = Val(InputBox("Введите значение х"))
y = Val(InputBox("Введите значение y"))
If y < 0 Then InputBox ("Значение не входит в область определения функции")
a = y^(-Sqr(Abs(x)))
b = (Sin(x) + E^(x + y))
c = Sqr((2 * Cos(x) ^ 2 + 3) / 5 * Sin(x))
K = Log(a) * b + c
MsgBox "Результат k = " & K, , "Вывод результатов"
End If
End Sub
Контрольные вопросы
Основные математические функции языка программирования, используемые в программе.
Функция для ввода данных с клавиатуры.
Функция для вывода результатов на экран.
Структура оператора If.
Основные математические функции языка программирования в данном примере это: Sqr – это извлечение квадратного корня, Sin – это взятие синуса, Cos- это взятие косинуса и Log- натуральный логарифм.
Функция для ввода данных с клавиатуры : x = Val(InputBox("Введите значение х"))
y = Val(InputBox("Введите значение y"))
Функция для вывода результатов на экран: MsgBox "Результат k = " & K, , "Вывод результатов"
Структура оператора If: If y < 0 Then InputBox ("Значение не входит в область определения функции"), т.е. если мы введем у<0, то появится окно с надписью «Значение не входит в область определения функции»
Лабораторная работа №3. Программирование разветвляющихся вычислительных процессов с использованием операторов If и Select Case.
Цель: Приобрести навыки программирования разветвляющихся вычислительных процессов.
Теоретические разделы для выполнения лабораторной работы
Использование логического оператора If при решении разветвляющихся вычислительных задач.
Разновидности и применение оператора If.
Оператор выбора Select Case.
Задание
Вычислить значение выражения. Варианты заданий указаны в приложении 3, с. 11. Исходные данные задать самостоятельно.
Часть 1.
Программирование разветвляющихся вычислительных процессов с использованием логического оператора If.