Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
Aristocratia
0 / 0 / 0
Регистрация: 11.12.2013
Сообщений: 1
#1

Вычисление значения функции методом Хорд

14.12.2013, 23:21. Просмотров 269. Ответов 0
Метки нет (Все метки)

По поиску нашел еще одну тему, но там программа написана не так, как нам давали и будет весьма подозрительно, да и прошу помощи в решении проблемы, а не в написании программы за меня

Функция: 2*exp^x-x^2+2.5


Программа:

Код
program mdk;
uses crt;
var
a, b, eps, x, xn: real;
function f(x:real):real;
begin
f:=2*exp(x)-2*x
end;
function f2(x:real):real;
begin
f2:=2*exp(x)-2
end;
begin
clrscr;
writeln ('Введите значения интервалов');
write ('a= '); read (a);
write ('b= '); read (b);
writeln ('Введите значение точности');
write ('eps= '); read (eps);
if f(a)*f2(a)>0 then
        begin
xn:=b;
repeat
     x:=xn;
     xn:=x-f(x)*(x-a)/(f(x)-f(a));
     until abs(xn-x)<eps;
        end
else
        begin
     xn:=a;
repeat
     x:=xn;
     xn:=x-f(x)*(b-x)/(f(b)-f(x));
     until abs(x-xn)<eps;
        end;

writeln ('x= ', x);
readkey;
end.
Ф1 и Ф2 - первая и вторая производная, при задании отрицательного а, корень выдает значением а, если а положительное программа вообще никак не реагирует... помогите, пожалуйста
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
14.12.2013, 23:21
Ответы с готовыми решениями:

Вычисление значения функции рекурсивным методом
Вычислить значение функции Х(n) при заданном значении n, используя рекурсию. ВНИМАНИЕ! Знаки...

Вычисление корня методом хорд
функция x^2-5x+6=0 нужно составить программу вычисления корня методом хорд, помогите, очень прошу...

Вычисление корня методом хорд
решить уравнение методом хорд (x-3)cosx-1=0

Решить уравнение f(x,g)=0 комбинированным методом(методом хорд и касательной)
здрасьте всем:) помогите решить задание,если не сложно даже два:)) 1.Получить элементы...

Вычисление значения функции с помощью разложения функции в степенной ряд
составить программу для вычисления значения функции y=1/(1+x) с помощью разложения функции в...

0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
14.12.2013, 23:21

Вычисление значения функции
Здравствуйте! Помогите составить программу вычисления значения функции, где х1:=10, хn:=150, шаг...

Вычисление значения функции
Написать программу вычисления значения функции,заданной условием аргумента(в паскале)

Вычисление значения функции
Доброго времени суток всем! Дано задание: Составить программу вычисляющую значение функции...


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

Или воспользуйтесь поиском по форуму:
1
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru