Ответ:

10 LET X=2

20 Y=(COS(X))^2+1/(TAN(4*X))

30 PRINT Y

40 END

В Qbasic x в тригонометрических функциях должен быть в радианах если х=2 это градусы тогда надо дописать еще одну строку перевести градусы в радианы

15 Х=3.14*Х/180