Помогите написать формулу в программной среде Basic

Мобильный Бэйсик подойдёт? У меня только он сейчас под рукой:

 sub main
  dim a, b, x, y, z as double
  x = 1.0
  y = 2.0
  z = 3.0
  a = cos(x-pi/6.0)/(0.5+sin(y)**2)
  b = 1.0+z**2/(3.0+z**2/5.0)
  print "a = " + string(a) + ", b = " + string(b) 
end sub 
 

Это полный исходник с заданием значений x, y и z и вычислением значений переменных a и b с их выводом на экран.