Составить программу расчета нормы расхода гербицида (л/га) по формуле

@Vla9imir · Регистрация: 25.09.2009

Author24 — интернет-сервис помощи студентам

Добрый день. Помогите решить задачку.
Составить программу расчета нормы расхода гербицида (л/га) по формуле:
P=Dn*n*600/Y*B,
где Y - скорость движения агрегата, км/ч; B - ширина захвата опрыскивателя, м; Dn - расход жидкости через один наконечник, л/мин; n - число наконечников.
Скорость движения агрегата меняется в пределах от 3 до 10 км/ч с шагом 1 км/ч.

Я сам далек от информатики, а жена еще дальше (ей собственно ее и задали). ОГРОМНОЕ СПАСИБО.

@gitarillo · 07.09.2012, 13:13

как же вас в плюсы то занесло. Это в раздел VB6

Visual Basic

Private Sub Command1_Click()
Dim P As Double
Dim n As Integer
Dim Y As Double
Dim B As Double
Dim Dn As Double
n = 5
B = 10
Dn = 15
For Y = 1 To 10
    P = (Dn * n * 600) / (Y * B)
    Print "P(" & Y & ")=" & P
Next
 
End Sub

@Vla9imir · 07.09.2012, 19:12 **[ТС]**

Спасибо огромное. Я же говорю, что не информатик я)))

@Vla9imir 15 / 15 / 2 Регистрация: 25.09.2009 Сообщений: 103 Записей в блоге: 1
		1
	Составить программу расчета нормы расхода гербицида (л/га) по формуле 07.09.2012, 12:16. Показов 3228. Ответов 2 Метки нет (Все метки) Добрый день. Помогите решить задачку. Составить программу расчета нормы расхода гербицида (л/га) по формуле: P=Dnn600/Y*B, где Y - скорость движения агрегата, км/ч; B - ширина захвата опрыскивателя, м; Dn - расход жидкости через один наконечник, л/мин; n - число наконечников. Скорость движения агрегата меняется в пределах от 3 до 10 км/ч с шагом 1 км/ч. Я сам далек от информатики, а жена еще дальше (ей собственно ее и задали). ОГРОМНОЕ СПАСИБО. 0

@Vla9imir 15 / 15 / 2 Регистрация: 25.09.2009 Сообщений: 103 Записей в блоге: 1
	07.09.2012, 19:12 [ТС]	3
	Спасибо огромное. Я же говорю, что не информатик я))) 0