Составить программу VBA для Excel для вычисления

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

Sub tt()

alp = 45

a = 1.753

b = 2.856

Z = (Tan(alp) + (a + b)) / b + Abs(a + b) ^ 3

MsgBox "z=" Z

End Sub

Запись алгоритма в виде блок-схемы