zadach128.BAS

{* Задача128 *}

REM basic

' Для заданных значений аргумента вычислить значение функции. Результат вывести в виде таблицы. Y=cos x+18, 5 на отрезке П< = X <= 2П с шагом П/2 Y=(sin x +4)/ 12, 5, на отрезке 0<=X<=П/2 с шагом П/4


cls
P=3.14
For x=P To 2*P     Step P/2
Y=cos(x) + 18.5
PRINT cls
         For x=0 To 13,14/2     Step 3,14/4
Y=(sin(x) + 4)/12.5
PRINT
End