Построить график функции в QBasic? y=ax+b a=3,b=1вот программа,но надо составить немного проще...без клеточек.20 SCREEN 12 30 VI
Построить график функции в QBasic? y=ax+b a=3,b=1
вот программа,но надо составить немного проще...без клеточек.
20 SCREEN 12
30 VIEW (10, 10)-(300, 300), , 3
40 WINDOW (-10, 10)-(10, -10)
50 FOR x = -10 TO 10
<span>60 LINE (x,
-10)-(x, 10), 7</span>
<span>70 LINE (-10,
x)-(10, x), 7</span>
<span>80 NEXT x </span>
90 LINE (-10, 0)-(10, 0), 5
100 LINE (0, -10)-(0, 10), 5
101 FOR x = -10 TO 10 STEP 0.1
<span> 102 PSET (x, 3*x +1), 10</span>
103 NEXT x
<span>104 END</span>