В чём ошибка? Sub main() Dim x, b, a, res As Single x = -3 b = 2 a = 0.5 res = (Sqr(5 * x...

Question

В чём ошибка?
Sub main()
Dim x, b, a, res As Single
x = -3
b = 2
a = 0.5
res = (Sqr(5 * x ^ 2 + 2 * Sin(b) ^ 2)) / Cos(Abs(a3 ^ -3 * Tan(b)))
MsgBox (res)
End Sub

Comments

Cos(Abs(a ^ 3 -3* ... вот так нужно было...

---

это просто примеры, для обучения. элементарные ошибки часто не заметны)))

Answer 1

Ошибка тут:
res = (Sqr(5 * x ^ 2 + 2 * Sin(b) ^ 2)) / Cos(Abs(a3 ^ -3 * Tan(b)))

Переменная a3 не определена

Comments

спасибо, слона то и не заметил ))), a3 это "a" в кубе)))