Вычислить значения элементов массива Z по формуле : Zi = cos(x) + tg(x), где x меняется на отрезке [1;15] с шагом 0,92.
visual basic

Предыдущий
вопрос Следующий
вопрос

Dim x As Double
Dim i As Integer
Dim Z(15) As Double

x = 1

For i = 1 To 15
Z(i) = Cos(x) + Tan(x)
x = x + 0.92
Next i

For i = 1 To 15
Console.WriteLine("Z(" & i & ") = " & Z(i))
Next i