Протабулировать функцию 4/х в бейсике
от -5 до 5 с шагом 0.5
MS DOS QBasic 1.0 FOR x = -5 TO 5 STEP .5 IF x <> 0 THEN PRINT x, 4 / x NEXT x