Делфи 10 класс помлгитнСоставить программу для вычисления значений функции y=f(x)...

Question

Делфи 10 класс помлгитн

Составить программу для вычисления значений функции y=f(x) произвольных значениях х.

---

Answer 1

Const
    a = 3.6;
    b = 1.7;

var
    x, y: real;

begin
    readln(x);
    if x <= 6 then<br>        y := sin(a * x) + 2
    else if x > 8 then
        y := sqr(cos(b * x))
    else y := (exp(a * x) + exp(-b * x)) / 2;
    writeln('y=', y);
end.