С Новым годом! Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.80/5: Рейтинг темы: голосов - 5, средняя оценка - 4.80
0 / 0 / 1
Регистрация: 23.02.2011
Сообщений: 18
1

Вычислить значение функции

23.02.2011, 20:21. Показов 858. Ответов 5
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Дана формула.
Написать программу счета по данной формуле.
Вычислить значение функции при x=2.5.
Заранее спасибо.
Миниатюры
Вычислить значение функции  
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
23.02.2011, 20:21
Ответы с готовыми решениями:

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

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

Вычислить значение функции e^x=1+x+x^2/2+x^3+3 и сравнить полученной результат c значением стандартной функции
Здраствуйте! Пожалуйста укажите услугу в помочи, вот задачка: Оформить у виде программы...

Вычислить значение аргумента и значение функции
В каждом задании задан параметр и диапазон его значений, из каждого значения параметра необходимо...

5
127 / 95 / 74
Регистрация: 18.01.2011
Сообщений: 227
24.02.2011, 01:03 2
Pascal
1
2
3
4
5
6
var x,y:real;
begin
x:=2.5;
y:=ln(sqrt(pi+abs(2-x)))/(3-1/x)+exp((1/3)*ln(x*x*sin(1.4*x*(pi/180))));
writeln('Ответ = ',y);
end.
1
0 / 0 / 1
Регистрация: 23.02.2011
Сообщений: 18
01.03.2011, 18:04  [ТС] 3
Спасибо.
Сначала я изменил её(чтобы надо было вводить х)
потом препод изменил мне её на :

Pascal
1
2
3
4
5
6
var x,y:real;
begin
writeln('Vvedite x');readln(x);
if (3-1/x)<>0 then y:=ln(sqrt(pi+abs(2-x)))/(3-1/x)+exp(1/3*ln(x*x))*sin(1.4*x*pi/180);
writeln('Otvet = ',y);
end.
И считает она не совсем так.
Вопрос :его программа правильна ?
0
56 / 56 / 14
Регистрация: 02.03.2010
Сообщений: 407
01.03.2011, 18:16 4
Нет. У него получилось ...+корень 3 степени из (x*x) * sin ... Т.е. синус он выкинул из корня. И потом, то условие, что он написал, лишь одно из по крайней мере трех.
Он проверяет, знаменатель, чтобы он не был равен нулю, но еще нужно проверять сам х <> 0, и область определения логарифма - значения >0
1
127 / 95 / 74
Регистрация: 18.01.2011
Сообщений: 227
01.03.2011, 18:35 5
Странное условие поставил ваш препод. Вообще это правильно с одной стороны, что он проверял знаменатель на ноль, но с другой что бы этот знаменатель был равен нулю, нужно
х=0,33333333333333... Грамотней уже было поставить
Pascal
1
if x<>0 then y:=
Это проще набрать
1
0 / 0 / 1
Регистрация: 23.02.2011
Сообщений: 18
01.03.2011, 18:44  [ТС] 6
Спасибо, что разъяснили, я просто в программирование "ни бум-бум".
Да и препод тот еще пи*арас (извиняюсь за мат).
Из за него из 120 человек на потоке сдали инфу только 17 (взятку дали и не скрывают), вот 5 марта отчислят если не сделаю .
0
01.03.2011, 18:44
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
01.03.2011, 18:44
Помогаю со студенческими работами здесь

Вычислить значение функции
помогите написать в паскале

Вычислить значение функции
Привет , подскажите пожалуйста , как будет правильнее посчитать данную функцию интересует , как...

Вычислить значение функции
Вычислить значение функции: y =\begin{cases}at^2-b; &amp; \text{ t&lt;0 }\text{ a=7,25} \\-b; &amp; \text{...

Вычислить значение функции
Подскажите пожалуйста, как написать на Паскале вычисление выражения данной функции?


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
6
Ответ Создать тему
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru