Протабулировать функцию - VB (62995)

Формулировка задачи:

Помогите пжл решить задачу и нарисовать блок схему=) Протабулировать функцию w=tg(7.25*x-ln|x-3|) для x=3.2,2.4,1.6,...-3.2

Решение задачи: «Протабулировать функцию»

textual
                            Листинг программы 
                        

                            Private Sub Command1_Click()
Dim x, t As String
t = ""
For x = 3.2 To -3.2 Step -0.8
t = t & "x=" & Round(x, 2) & "     " & "y=" & Round(Tan(7.25 * x - Log(Abs(x - 3))), 2) & vbNewLine
Next x
MsgBox t
End Sub
                        

Оцени полезность:

12 голосов , оценка 4.083 из 5

Похожие ответы