Помогите со 2 задачей по информатике добрые люди)использую цикл while составить таблицу значений функции y = cos x отрезке [0;2,1] с шагом 0.1 срочно))))если не затруднит)

Microsoft QBasic 1.0

CLS
x = 0
DO WHILE x lt;= 2.1001
   PRINT x, COS(x)
   x = x + .1
LOOP

Результат
 0             1
 .1            .9950042
 .2            .9800666
 .3            .9553365
 .4            .921061
 .5            .8775826
 .6            .8253356
 .7            .7648422
 .8000001      .6967067
 .9000001      .6216099
 1             .5403022
 1.1           .453596
 1.2           .3623576
 1.3           .2674986
 1.4           .1699669
 1.5           7.073697E-02
 1.6          -2.919978E-02
 1.7          -.1288448
 1.8          -.2272024
 1.9          -.3232899
 2            -.4161471
 2.1          -.5048462