zadach278.BAS

{* Задача278 *}

REM basic

' Написать программу построения графика функции Y=2sin*x/2+1/2cos2x и вывести результат на экран. Внизу под графиком должно быть название заданной функции.


SCREEN 7
 
x = 50
y = 50
LINE (0, 50)-(320, 50), 4
LOCATE 6, 1: PRINT "x"
LOCATE 1, 6: PRINT "y"
LOCATE 10, 8: PRINT "y=2sin(x/2)+1/2cos(2x)"
 
LINE (50, 0)-(50, 240), 4
For i = 0 To 55 Step .01
       yi = 2 * SIN(i / 2) + (1 / 2) * COS(2 * i)
       PSET (x + 5 * i, y + 5 * yi), 15
Next i