Проверить вычисления по формулам - QBasic

Проверьте пожалуйста, по-моему какую-то дичь пишу, уже мозг плывет от этих заданий. 1)

REM zadanie 2
INPUT "vvedite 4 chisla", a, b, c, d
PRINT a / c * b / d - (a * b - c) / c * d

REM zadanie12
INPUT "X=", x
PRINT (x ^ 2 - 7 * x) + 10 / (x ^ 2 - 8 * x) + 12

REM zadanie20
INPUT "X=", x
INPUT "Y=", y
PRINT 1 + SIN(SQR(x)) + 1 / COS(12 * y - 4)

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

PRINT (x ^ 2 - 7 * x + 10)/ (x ^ 2 - 8 * x + 12)

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

В данном коде происходит вычисление выражения по формуле:

Сначала происходит возведение в степень x с показателем 2, что можно записать как x^2.
Затем происходит умножение x на 7, что можно записать как 7*x.
Далее происходит сложение 10 и результата предыдущего вычисления, что можно записать как 10 + (x^2 - 7*x + 10).
После этого происходит возведение в степень x с показателем 2, что можно записать как x^2.
Затем происходит умножение x на 8, что можно записать как 8*x.
Далее происходит вычитание 8x из результата предыдущего вычисления, что можно записать как (x^2 - 8x + 12).
И наконец, результат предыдущего вычисления делится на результат вычитания 8x из (x^2 - 8x + 12), что можно записать как (x^2 - 7x + 10)/(x^2 - 8x + 12). Таким образом, в коде происходит вычисление значения выражения (x ^ 2 - 7 x + 10)/ (x ^ 2 - 8 x + 12).