Создан заказ №1582668
13 декабря 2016
Найти максимальное значение функции при изменении х на отрезке [-3 3] с шагом h = 0
Как заказчик описал требования к работе:
Вариант 4. сделать через visual basic и оформить все в ворде.
Фрагмент выполненной работы:
Найти максимальное значение функции при изменении х на отрезке
[-3; 3] с шагом h = 0,5. Для этого необходимо написать программный код трех процедур:
25336512065000 min {x - ax , a + x, sin x } если 0 < x ≤ 1
f = max {x, ax}, если x > 1
ax + b, если х ≤ 0
Процедуры-функции с соответствующими формальными параметрами для вычисления значения переменной y = f(x) в одной точке. (работа была выполнена специалистами Автор 24)
Процедуры-подпрограммы вычисления максимального значения функции f(x) при изменении х на заданном отрезке с заданным шагом. Данная процедура для вычисления значения f(x) в одной точке х должна обращаться к процедуре п.1).
Событийной процедуры, которая осуществляет ввод необходимых исходных данных, вызов процедуры п.2) и вывод результата.
Решение:
Imports System.Math
Public Class Form1
Function Fx(ByVal a As Double, ByVal b As Double, ByVal xk As Double)
Dim y1, y2, y3 As Double
If xk > 0 And xk <= 1 Then
y1 = (xk - a) / xk
y2 = Math.Sqrt(a) + xk
y3 = Math.Sin(xk)
If y1 < y2 Then
If y1 < y3 Then
Fx = y1
Else
Fx = y3
End If
Else
If y2 < y3 Then
Fx = y2
Else
Fx = y3
End If
End If
ElseIf xk > 1 Then
y1 = Math.Sqrt(xk)
y2 = a * xk
If y1 > y2 Then
Fx = y1
Else
Fx = y2
End If
Else
Fx = a * xk + b
End If
End Function
Sub MaxFx(ByVal a As Double, ByVal b As Double, ByRef max As Double)
Dim x, y As Double
max = Double.MinValue
For x = -3 To 3 Step 0.5
y = Fx(a, b, x)
...Посмотреть предложения по расчету стоимости
Заказчик
заплатил
заплатил
200 ₽
Заказчик не использовал рассрочку
Гарантия сервиса
Автор24
Автор24
20 дней
Заказчик принял работу без использования гарантии
14 декабря 2016
Заказ завершен, заказчик получил финальный файл с работой
5
Найти максимальное значение функции при изменении х на отрезке
[-3 3] с шагом h = 0.docx
2018-03-18 12:41
Последний отзыв студента о бирже Автор24
Общая оценка
5
Положительно
Сделал работу буквально за пару часов! Все отлично, автор всегда на связи! Спасибо за работу!
Хочешь такую же работу?
300 ₽
