Составить программу вычисления значений функции в бейсик

помогите пожалуйста составить программу вычисления значений функции в бейсик { - система

Y={ ((AX^2-b)/(2AB)) при B>=A, ((B^3+2a)/SQR(AB)) при B<A

A не равно 0 и В не равно 0