profile
Опубликовано 5 лет назад по предмету Информатика от lokkk

Построить график функции: y = а*sin(x+b) + x при а = 3,2; b = 2,0; шаг h и значения х (не менее 15 значений) задать самостоятельно.

  1. Ответ
    Ответ дан Ghost22

    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.

Самые новые вопросы