Вывести на экран отрицательные функции y=4x(5-3x^2) при изменении x от 1 до 2 с шагом 0,1 — QBasic(Бейсик)

CLS
FOR x = 1 TO 2 STEP .1
    y = 4 * x * (5 - 3 * (x ^ 2))
    IF y < 0 THEN PRINT "Otricatelnie znacheiy: "; y
NEXT x
END

Тестирование выполнено в программе QB64 ( Скачать )