Найти ошибку в коде - QBasic (27684)

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

Всем привет. Ребята нужна помощь .я никогда не работала в бейсике. Перепечатала программу с методички - не работает .

                    Листинг программы
                
 
                        
                          
                    
PRINT "таблица"
a = 1.28: b = 3.88 'отрезок [a,b]
h = 0.26 ' шаг зменения аргумента
deffnf(x) = INT((0.116 * x ^ 2 + 1.3) / (0.7151 * x - SQR(x)) * 1000) / 1000 ' вычисление значений функции с округлением
PRINT "____________________________________"
PRINT "|  x  |  y  | delta y | delta2 y |"
PRINT "____________________________________"
PRINT y = fnf(a): y0 = fnf(a + h)
PRINT USING; "|##.##|#.###|        |"; a, y
z0 = (y0 - y) * 1000
FOR x = a + h TO b STEP h
PRINT USING; "|               |         | #### |       |"; z0
y = fnf(x + h)
z = (y - y0) * 1000 ' первая табличная разность
w = z - z0 ' вторая табличгая разность
PRINT USING; "|##.##|#.###|     |     |###|"; x, y0, w
z0 = z: y0 = y
NEXT x
PRINT "_____________________________________________--"
END

помогите

Решение задачи: «Найти ошибку в коде»

textual
                            Листинг программы 
                        
 
                        
                          
                    
10 PRINT "таблица"
20 a = 1.28: b = 3.88 'отрезок [a,b]
30 h = 0.26 ' шаг зменения аргумента
40 deffnf(x) = INT((0.116 * x ^ 2 + 1.3) / (0.7151 * x - SQR(x)) * 1000) / 1000 ' вычисление значений функции с округлением
50 PRINT "<br>"
60 PRINT "|  x  |  y  | delta y | delta2 y |"
70 PRINT "<br>"
80 PRINT y = fnf(a): y0 = fnf(a + h)
90 PRINT USING "|##.##|#.###|        |"; a, y
100 z0 = (y0 - y) * 1000
110 FOR x = a + h TO b STEP h
    120 PRINT USING "|               |         | #### |       |"; z0
    130 y = fnf(x + h)
    140 z = (y - y0) * 1000 ' первая табличная разность
    150 w = z - z0 ' вторая табличгая разность
    160 PRINT USING "|##.##|#.###|     |     |###|"; x, y0, w
    170 z0 = z: y0 = y
180 NEXT x
190 PRINT "<br>--"
200 END