Вычислять определенный член ряда - QBasic

Вычислять определенный член ряда в системе Qbasic и на MathCad используя заданную рекуррентную формулу y₀=0; y₁=1; y₁₄=?

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

y1=0
y2=1
FOR i=2 TO 14
y=0.3*y2^3-0.7*y1^2
y1=y2
y2=y
NEXT i

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

Задаются два начальных значения переменных y1 и y2 равные 0 и 1 соответственно.
Запускается цикл FOR от 2 до 14 (включительно).
Внутри цикла происходит вычисление значения переменной y по формуле 0.3*y2^3-0.7*y1^2.
Значение переменной y1 присваивается значение переменной y2.
Значение переменной y2 присваивается значение переменной y.
После завершения цикла выводится сообщение об ошибке Ошибка 90: Неверный номер точки входа в процедуру.