Составить программу вычисления значений функции F(x)=2tgx/2+1 на отрезке [a;b] с шагом h — Basic(Бейсик)

CLS
INPUT "a,b,h=";a,b,h
FOR x=a TO b STEP  h
y=2*TAN(x/2)+1
PRINT"x=";x,"y=";y
NEXT x
END