помогите составить программу на языке паскаль: Вычислить значение выражения: f(x)=ctg
Помогите составить программку на языке паскаль:
Вычислить значение выражения: f(x)=ctg 3x*log(2x+3)*4 при всех значениях х.
Прошу 16 баллов!
1 ответ
Пашнин Шурик
1-ый вариант: если десятичный логарифм от (2x+3).
Var X:real;
Begin
Write('x = ');ReadLn(x);
if xlt;=-1.5 then WriteLn('Ошибка: Нельзя вычислить логарифм от нуля!')
else if x = 0 then WriteLn('Ошибка: На ноль разделять нельзя!')
else WriteLn('f(',x,') = ',Ln(2*x+3)*4/(Tan(3*x)*Ln(10)))
End.
2-ой вариант: если логарифм по основанию (2x+3) от 4.
Var X:real;
Begin
Write('x = ');ReadLn(x);
if xlt;=-1.5 then WriteLn('Ошибка: Основание логарифма обязано быть больше нуля!')
else if x = 0 then WriteLn('Ошибка: На ноль делить нельзя!')
else WriteLn('f(',x,') = ',Ln(4)/(Tan(3*x)*Ln(2*x+3)))
End.
Var X:real;
Begin
Write('x = ');ReadLn(x);
if xlt;=-1.5 then WriteLn('Ошибка: Нельзя вычислить логарифм от нуля!')
else if x = 0 then WriteLn('Ошибка: На ноль разделять нельзя!')
else WriteLn('f(',x,') = ',Ln(2*x+3)*4/(Tan(3*x)*Ln(10)))
End.
2-ой вариант: если логарифм по основанию (2x+3) от 4.
Var X:real;
Begin
Write('x = ');ReadLn(x);
if xlt;=-1.5 then WriteLn('Ошибка: Основание логарифма обязано быть больше нуля!')
else if x = 0 then WriteLn('Ошибка: На ноль делить нельзя!')
else WriteLn('f(',x,') = ',Ln(4)/(Tan(3*x)*Ln(2*x+3)))
End.
, оставишь ответ?
Похожие вопросы
-
Вопросы ответы
Новое
NEW
Статьи
Информатика
Статьи
Последние вопросы
Во сколько раз число атомов кислорода в земной коре больше числа
Химия.
Составить монолог от имени дневника двоечника 7-10 предложений
Русский язык.
Рассматривая литературный язык как сложное взаимодействие книжного языка и разговорного,В.И.Чернышёв горячо
Разные вопросы.
Арабы входят в __________________ групп народов. Местом расселения арабов с незапамятных
Разные вопросы.
Грузовой автомобиль марки краз за одну поездку может доставить 7.500 кирпичей
Математика.
Определить предложения какие они по цели высказывания и по интонации
Русский язык.
"Три толстяка" Называли эту площадь Площадью Звезды последующей причине.
Русский язык.
на одной грядке коротышки посадили 3 ряда морковок по 8 штук
Разные вопросы.
эссе на тему какое образование дается в каждой семье
Қазақ тiлi.
Put the verb in brackets into the Present Indefinite.
1The Volga ,
Английский язык.
Облако тегов