Составить программу на алгоритмическом языке бейсик y=tgx-2x-tgπ/6+π/3 при π/6<=x<=π/3...

MS DOS QBasic 1.0

CLS
pi = 4 * ATN(1)
FOR x = pi / 6 TO pi / 3 STEP pi / 30
   y = TAN(x) - 2 * x - TAN(pi / 6) + pi / 3
   PRINT x, y
NEXT x

Результат

.5235988      0
.6283185     -6.024725E-02
.7330383     -9.582524E-02
.8377581     -9.505627E-02
.9424778     -3.872636E-02
1.047198      .1075031

Составить программу ** алгоритмическом языке бейсик y=tgx-2x-tgπ/6+π/3 при π/6<=x<=π/3...