Записать выражения и вычислить их значения при заданных значениях переменной - QBasic

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

Записать выражения и вычислить их значения при заданных значениях переменной. Знаю, что аналогичная тема мною была создана еще вчера, однако для успешной сдачи прибавились еще выражения. Огромно буду Вам благодарен, если поможете с решением!

Решение задачи: «Записать выражения и вычислить их значения при заданных значениях переменной»

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

CLS
CONST pi = 3.141593
CONST k = pi / 180
INPUT "X = "; x
 
PRINT 2 * COS(k * 45) / SIN(k * 45) - 1 / (12 * x ^ 2 + 7 * x - 5)
END

Объяснение кода листинга программы

В этом коде:

Объявляются константы: число π (pi) и коэффициент k.
Пользователю предлагается ввести значение переменной X.
Вычисляется и выводится на экран выражение 2 COS(k 45) / SIN(k 45) — 1 / (12 x ^ 2 + 7 * x — 5). Вот список элементов кода с номерами:
Объявление константы pi: 3.141593.
Объявление константы k: pi / 180.
Ввод значения переменной X с помощью команды INPUT X =; x.
Вычисление и вывод на экран выражения 2 COS(k 45) / SIN(k 45) — 1 / (12 x ^ 2 + 7 * x — 5).