PRINT "x", "r"
FOR x = -1 TO 1.001 STEP .1
r = TAN(x) - EXP(-x) + x - 1
PRINT USING "##.#"; x;
PRINT " ";
PRINT USING "##.######"; r
NEXT
PRINT "x", "r"
FOR x = -1 TO 1.001 STEP .1
r = TAN(x) - EXP(-x) + x - 1
PRINT USING "##.#"; x;
PRINT " ";
PRINT USING "##.######"; r
NEXT