Помогите написать код на basic - VB

Формулировка задачи:

Добрый день. Пожалуйста помогите написать год на basic-е или откуда можно найти конвертер из Pascal в Basic ?
1. Найти значение функции для любого аргумента
y=ctg(2x+x*x) если a>2
y=корень(а+4) если -2<=a<=2
y=Ln(4+a) в ост. случаях
2. Значения функции y=x*x*x+2 представить в виде таблиц в отрезке [0; 150] шагом 0.03
3.Найти среднеарифметическое значение следующих выражений:
a=tg(2x+z*z) b=sum(i=0, N) (4x+1)^2
Спасибо

Решение задачи: «Помогите написать код на basic»

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

                            x=0
for x=0 to 150 step 0.03
y=x^3+2
print "x="; x; " y="; y
next x

                        