Вычислить корни уравнений: y=x^2-6; y=-2*(x^2)/3. На отрезке [-5;5] с точностью E=10^-3 — Basic(Бейсик)

e = .001
FOR x = -5 TO 5 STEP .001
y1 = x ^ 2 - 6
y2 = -2 * (x ^ 2) / 3
IF ABS(y1 - y2) < e THEN PRINT USING "##.###"; x
NEXT