Значения функции(2) - Turbo Pascal

Узнай цену своей работы

Формулировка задачи:

Здравствуйте, помогите разобраться с задачей. Не могу найти никакой информации о таких задачах ( не знаю что именно надо искать -_- ), даже в голове не могу представить как должен выглядеть код.

Решение задачи: «Значения функции(2)»

textual
Листинг программы
const A=2;
        B=3;
        C=5;
var X,Y:real;
begin
X:=exp(A)+ln(B)+4*C;
if X<1.5 then
   Y:=18*sin(X)+sin(2*X)
else if X=1.5 then
   Y:=X*X+3*X-1
else
   Y:=(X+2)*(X+2)*(X+2)-sqrt(X*X-1);
writeln('Y=',Y);
end.

Объяснение кода листинга программы

  1. В коде объявлены три константы: A, B и C, которые имеют значения 2, 3 и 5 соответственно.
  2. Также в коде объявлены две переменные типа real: X и Y.
  3. Значение переменной X вычисляется как сумма экспоненты от A, логарифма от B и 4-кратного значения C.
  4. Затем, если значение X меньше 1.5, то значение переменной Y вычисляется как 18-кратный синус от X, плюс синус от 2-кратного значения X.
  5. Если значение X равно 1.5, то значение переменной Y вычисляется как квадрат от X, умноженный на 3, плюс X, возведенное в куб, и минус 1.
  6. В противном случае, значение переменной Y вычисляется как куб от (X+2), умноженный на (X+2), умноженный на (X+2), минус квадратный корень от (X*X-1).
  7. Наконец, значение переменной Y выводится на экран с помощью функции writeln, с указанием значения переменной Y.

Оцени полезность:

12   голосов , оценка 4 из 5
Похожие ответы