Решить уравнение ax+b=0, если a изменяется от -4 до 8 с шагом 2, b от 1 до 20 с шагом 1. — QBasic(Бейсик)

SCREEN 0
WIDTH 80, 50
CLS
FOR a% = -4 TO 8 STEP 2
  FOR b% = 1 TO 20
    x! = -b% / a%
    PRINT x!,
  NEXT
NEXT

SCREEN 0
WIDTH 80, 50
CLS
FOR a% = -4 TO 8 STEP 2
  FOR b% = 1 TO 20
    IF a% <> 0 THEN
    x# = -b% / a%
    PRINT STR$(INT(x#)) + LTRIM$(LEFT$(STR$(x# - INT(x#)), 5)),
    ELSE
    PRINT "+Beskonechn",
    END IF
  NEXT
NEXT