Пример 2. Представить аналитическими выражениями функцию y = f(x), заданную графически.Представить аналитическими выражениями функцию y = f(x), заданную графически.
Изобразить блок-схему и написать программу для расчета y = f(x) при различных значениях x. Решение примера 2 Функция y = f(x) – непрерывная и рассчитывается для трех интервалов значений аргумента: 1. x = (-∞, 0), 2. x = [0,1], 3. x = (1, +∞): интервал 1 описывается уравнением интервал 2 описывается уравнением интервал 3 описывается уравнением Алгоритм (блок-схема) расчета функции y=f(x) представлен на рисунке.
Алгоритм может быть реализован на VB следующим образом: Sub primer2() Dim x As Double ' Объявление переменной для аргумента Dim y As Double ' Объявление аргумента для функции x = 0.5 ' Ввод значения аргумента функции Select Case x ' Оператор проверки значения аргумента Case Is < 0 ' Условие принадлежности к первому интервалу y = x + 1 ' Вычисление функции на первом интервале Case Is <= 1 ' Условие принадлежности ко второму интервалу y = Sqr(1 - x * x) ' Вычисление функции на втором интервале Case Else ' Принадлежность аргумента третьему интервалу y = 0 ' Вычисление функции на третьем интервале End Select MsgBox "В x = " & x & " y = " & y ' Отображение аргумента и вычисленной для него функции End Sub Результаты работы программы:
Для x = -1.5 ' Ввод значения аргумента функции
|
,
или 
,
.
