Создан заказ №1655097
10 января 2017
Вариант 23 31051563246000Задача 1 Найти произведение отрицательных значений функции при изменении х на отрезке [-1
Как заказчик описал требования к работе:
Задание: сделать решение задач по программированию за 2 дня, красиво оформить. Сколько стоит решение задач пишите точно.
Фрагмент выполненной работы:
Вариант 23
31051563246000Задача 1. Найти произведение отрицательных значений функции при изменении х на отрезке [-1; 5] с шагом h = 0,3. Для этого необходимо написать программный код трех процедур:
b2+ c2, если 3 ≤ x ≤ 4
z = min {a, max{x2, y, c}, если x < 3
max {ax + c,y3 }, в противном случае
1) Процедуры-функции с соответствующими формальными параметрами для вычисления значения переменной t = z(x) в одной точке. (работа была выполнена специалистами author24.ru)
2) Процедуры-подпрограммы вычисления суммы отрицательных значений функции z(x) при изменении х на заданном отрезке с заданным шагом. Данная процедура для вычисления значения z(x) в одной точке х должна обращаться к процедуре п.1).
3) Событийной процедуры, которая осуществляет ввод необходимых исходных данных, вызов процедуры п.2) и вывод результата.
Решение:
Imports System.Math
Public Class Form1
Function Zx(ByVal a As Double, ByVal b As Double, ByVal c As Double, ByVal y As Double, ByVal x As Double)
Dim z1, z2 As Double
If x >= 3 And x <= 4 Then
Zx = Math.Sqrt(b * b + c * c)
ElseIf x < 3 Then
z1 = x * x
If y > z1 Then
If y > c Then
z1 = y
Else
z1 = c
End If
ElseIf c > z1 Then
z1 = c
End If
If a < z1 Then
Zx = a
Else
Zx = z1
End If
Else
z1 = a * x + c
z2 = y * y * y
If z1 > z2 Then
Zx = z1
Else
Zx = z2
End If
End If
End Function
Sub Product(ByVal a As Double, ByVal b As Double, ByVal c As Double, ByVal y As Double, ByRef P As Double)
Dim xk, z As Double
Dim flag As Boolean
P = 1
flag = 0
For xk = -1 To 5 Step 0.3
z = Zx(a, b, c, y, xk)
If z < 0 Then
P = P * z : flag = 1
End If
Next xk
If flag = 0 Then
P = Double.NaN
End If
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles...Посмотреть предложения по расчету стоимости
Заказчик
заплатил
заплатил
20 ₽
Заказчик не использовал рассрочку
Гарантия сервиса
Автор24
Автор24
20 дней
Заказчик принял работу без использования гарантии
11 января 2017
Заказ завершен, заказчик получил финальный файл с работой
5
Вариант 23
31051563246000Задача 1 Найти произведение отрицательных значений функции при изменении х на отрезке [-1.jpg
2017-01-14 18:26
Последний отзыв студента о бирже Автор24
Общая оценка
5
Положительно
Работу выполнил раньше срока, после ответил на все вопросы и помог разобраться! Если вам нужна хорошая оценка, вы однозначно попали к нужному автору!!
P.S. Спасибо)