
Давно мы не строили графики функций. Давайте сегодня этим и займёмся.
Предлагаю рассмотреть образец программы...
Program sinus; Uses Graph; Var Gd, Gm : SmaLLInt; x, A, B, C: integer; Begin Gd:=Detect; InitGraph(Gd,Gm,''); A:=100; B:=80; C:=20; for x:= -100 to 1000 do begin Putpixel(x+C, round(A*sin(x/B))+GetMaxY div 2,14); end; Readln; CloseGraph; End. |
Думаю с доведением до ума синусоиды у вас проблем не будет. Затем по аналогии строим графики функции COS, TG и CTG. Надеюсь вы помните, что тангенс это отношение синуса к косинусу, а котангенс - отношение косинуса к синусу. Все графики разного цвета рисуем на одной координатной плоскости. В углу экрана укажите легенду. Разметка на осях желательна.
Ниже образцы графиков функций.
Текст программы вставляем в комментарий к этому сообщению, в теме указываем Фамилию и Имя.
Удачи!