[tim537]

Помогите пожалуйста дописать код этой функции


то, что я начал, а дальше не знаю:

Код:

 function f(x,a:real):real;
begin
    if   x<=0 then
         f:= sqrt(abs(x-1))-a
    else if x<=a then
         f:=

    end;

[Bargest]

Код:

f := sqr(x)*sqr(x)/7+a
...
begin
  sinx := sin(2*a*x+pi);
  f := sqr(sinx)*sinx;
end;

[tim537]

А можно плз полностью код, а то я вообще ничего не пойму

[_SLY_]

что значит синус третьей степени?

[M.A.D.M.A.N.]

sin(x)^3 вроде

[Aristarh Dark]

Сообщение от M.A.D.M.A.N.

sin(x)^3 вроде

Не, это в Васике. В дельфях: Power - наше все.

[_SLY_]

Тогда вот. не забудь, если задание не теоретическое uses math;

Код:

function f(const x,a:real):real;
begin
    if  x<=0 then
        result := sqrt(abs(x-1))-a
    else if x>a then
        Power(Sin(2*a*x+pi),3)
    else
        result := (power(x,4) / 7) + a;

    end;

[NumLock]

чтобы небыло сомнений: sin(x)*sin(x)*sin(x)
sorry for offtop

[_SLY_]

ах, и const можешь убрать из объявление функции, это я на свой лад . Так же можешь заменить result на f как было изначально, тоже никакой разницы.

[_SLY_]

и я забыл этот самый результ во второй ветке... так что вот, поправил:

Код:

function f(x,a:real):real;
begin
    if  x<=0 then
        f := sqrt(abs(x-1))-a
    else if x>a then
        f := Power(Sin(2*a*x+pi),3)
    else
        f := (power(x,4) / 7) + a;
end;

[M.A.D.M.A.N.]

Сообщение от Aristarh Dark

Не, это в Васике. В дельфях: Power - наше все.

Ну это я образно имел ввиду, что значение синуса от икс возводится в куб.

[_SLY_]

тогда что это значит? в виде кода

[M.A.D.M.A.N.]

power(sin(...), 3) не помню что первым параметром ф-ии идет, база или экспонента.

[_SLY_]

Код:

power(2,8); //256
power(8,2) //64

я думаю понятно