написать программу решающую эту задачу в pascalABC. Заранее

151

303

Посмотреть ответы 2

Ответы на вопрос:

lenasavostyanova

Информатика

4,5(57 оценок)

pascalABC

Объяснение:

var x, y: real;

begin

Write('Введите значение аргумента x = '); ReadLn(x);

if x < 1 then y := exp(1) / tan(2.9 + 3 * x)

else if x > 6 then y := sin(3 * x) + ln(x + 0.3)/ln(10)

else if (x >= 2) and (x <= 4) then y := 0.6 * ln(abs(5 - sqr(x)))

else begin WriteLn('Аргумент вне диапазона!'); exit; end;

WriteLn('y(', x, ') = ', y:1:3);

end.

alkasalamatina

Информатика

4,4(82 оценок)

к >5[ter]

вт

рпидрелма

Задай свой вопрос

Как otvet5GPT работает?

otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
Сколько это стоит?

Проект находиться на стадии тестирования и все услуги бесплатны.
Могу ли я использовать otvet5GPT в школе?

Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
В чем отличия от ChatGPT?

otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.