Студопедия Главная Случайная страница Обратная связь

Разделы: Автомобили Астрономия Биология География Дом и сад Другие языки Другое Информатика История Культура Литература Логика Математика Медицина Металлургия Механика Образование Охрана труда Педагогика Политика Право Психология Религия Риторика Социология Спорт Строительство Технология Туризм Физика Философия Финансы Химия Черчение Экология Экономика Электроника

Решение примера 1




На область определения y = f(x) накладываются следующие ограничения:

Условие 1 обусловлено аргументом логарифма, условие 2 определяется отсутствием 0 в знаменателе дроби, условие 3 определяет неотрицательность подкоренного выражения. Изобразим ограничения области определения функции на оси x .

1.

2.

3. или

 

Суммируя все ограничения, получим область определения y = f(x): x = (1,2].

Алгоритм расчета функции представлен в блок-схеме.

Алгоритм может быть реализован на VB следующим образом:

Sub primer1()

Dim x As Double ' Объявление переменной для аргумента

Dim y As Double ' Объявление переменной для функции

x = 1.1 ' Ввод значения аргумента функции

If (x > 1 And x <= 2) Then

' Оператор проверки значения аргумента на вхождение

' в область определения

y = Sqr((2 - x) / Log(x)) ' Вычисление функции

MsgBox "В x = " & x & " y = " & y

' Отображение аргумента и вычисленной для него функции

Else

MsgBox "В x = " & x & Chr(10) & Chr(13) & "функции нет"

' Отображение сообщения о невозможности рассчитать функцию,

' т.к. аргумент не входит в область определения

End If ' Завершение оператора проверки

End Sub

Результаты работы программы:

Для

x = 1 ' Ввод значения аргумента функции







Дата добавления: 2015-10-15; просмотров: 195. Нарушение авторских прав


Рекомендуемые страницы:


Studopedia.info - Студопедия - 2014-2020 год . (0.001 сек.) русская версия | украинская версия