Составить три варианта программы вычисления функции: первый вариант с использованием оператора f; второй вариант с использованием оператора select case; третий вариант с использованием оператора DEF (функция пользователя) — QBasic(Бейсик)

       x^2             при x<A
y=     x^2+Acosx-sinx      A<=x<=B    
       tgx A=1

INPUT "vvedite x ", x
INPUT "vvedite B ", b
a = 1
IF x < a THEN y = x ^ 2 ELSE IF x > b THEN y = TAN(x) ELSE y = x ^ 2 + a * b * COS(x) - SIN(x)
PRINT "y="; y

INPUT "vvedite x ", x
INPUT "vvedite B ", b
a = 1
SELECT CASE x
    CASE IS < a
        y = x ^ 2
    CASE IS > b
        y = TAN(x)
    CASE ELSE
        y = x ^ 2 + a * b * COS(x) - SIN(x)
END SELECT
PRINT "y="; y