begin Write('Введите значение аргумента x: '); Readln(x); Write('Введите значение коэффициента a: '); Readln(a); {боремся с неположительным значением под знаком корня} t := a - cos(x); if t < 0 then y := exp(x + 1.8) - exp(1 / 5 * ln(-t)) else if t = 0 then y := exp(x + 1.8) else y := exp(x + 1.8) + exp(1 / 5 * ln(t)); Writeln('Значение функции равно ', y) end.
Тестовое решение:
Введите значение аргумента x: -4.2 Введите значение коэффициента a: 1.95 Значение функции равно 1.28604638457326
В современной жизни все вокруг стремительно растет и развивается. Общение между людьми, странами и континентами осуществляется мгновенно. Любая информация доступна и поступает оперативно, благодаря всемирной сети Интернет. Компьютер в нашей жизни по праву занял одно из главных мест. С детского сада малышей начинают знакомить с компьютером. Сначала все напоминает занимательную игру. Дети учатся находить нужные кнопочки и клавиши, чтобы привести в движение тех или иных персонажей. Школьная пора – это более активное продолжение работы с компьютером. Как известно, книга – источник знаний. Так вот сейчас можно воспользоваться электронной книгой, если некогда сидеть в библиотеке. Для этого необходимо зайти в интернет, найти заданное произведение и скачать его на жесткий диск своей электронной книги. Она удобна, легка и компактна. Ее можно читать где угодно: в самолете, электричке, трамвае и дома, на диване. Полученные знания будут в учебе, и развивать вашу личность. В старших классах подросток определяется с выбором профессии. И любая из них, так или иначе, предполагает работу с компьютером. Сегодня все сферы производства компьютеризированы. Практически не осталось специальностей, где можно обойтись без этого чуда техники. Поэтому компьютерная грамота является одним из основных школьных предметов. Кроме того, компьютер в нашей жизни стал посредником в общении между людьми. Вечерами, а то и ночами напролет подавляющее большинство продвинутых пользователей сидят в Скайпе и Одноклассниках. Многие нашли своих утерянных родственников и старинных друзей, новых знакомых, интересных собеседников и, даже, возлюбленных. Монитор компьютера – это окно в мир. Ты путешествуешь по разным странам и континентам, и никогда не остаешься за боротом всех информационных новинок и технических разработок. Ты узнаешь мировые новости и глобальные проблемы человечества. Компьютерные знания позволяют тебе иметь активную жизненную позицию и быть неотъемлемой частичкой нашей необъятной Вселенной.
x, a, t, y: real;
begin
Write('Введите значение аргумента x: ');
Readln(x);
Write('Введите значение коэффициента a: ');
Readln(a);
{боремся с неположительным значением под знаком корня}
t := a - cos(x);
if t < 0 then y := exp(x + 1.8) - exp(1 / 5 * ln(-t))
else if t = 0 then y := exp(x + 1.8)
else y := exp(x + 1.8) + exp(1 / 5 * ln(t));
Writeln('Значение функции равно ', y)
end.
Тестовое решение:
Введите значение аргумента x: -4.2
Введите значение коэффициента a: 1.95
Значение функции равно 1.28604638457326