Предмет: Информатика,
автор: lokkk
Построить график функции: y = а*sin(x+b) + x при а = 3,2; b = 2,0; шаг h и значения х (не менее 15 значений) задать самостоятельно.
Ответы
Автор ответа:
0
Program Pr1;
uses crt,graphABC;
var y,x,a,b:real;
Begin
clrscr;
setwindowsize(400,400);
line(0,200,400,200);
line(200,0,200,400);
setbrushcolor(clblack);
a:=3.2;
b:=2;
x:=-30;
while x<=30 do begin
y:=-(a*sin(x+b)+x);
circle(trunc(x*20+200),trunc(y*20+200),3);
x:=x+0.1;
end;
end.
Похожие вопросы
Предмет: Химия,
автор: artemys2005
Предмет: Математика,
автор: erenbakkyzyrbek
Предмет: Литература,
автор: Аноним
Предмет: Алгебра,
автор: vavilova20