Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 13.02.2012, 20:11   #1
желающий знать
 
Регистрация: 06.11.2011
Сообщений: 6
Вопрос программа с процедурой

Возникла небольшая проблема с написанием программы, которая находит корень уравнения x*x-4=0 при помощи метода касательных. В програмке нужно написать процедуру в описательной части. Эта процедура должна для одного значения считать f(x) и f '(x).Второе значение-это производная функции. Моё положение ухудшилось из-за незнания что такое производная: мы её ещё не проходили.
Нам выдали следующую блок-схему:
процедура f(x), f '(x);
ввод a,b,e
1:
ввод xo
2:
Код:
h=-f(x)/f '(x)
x=x0+h;
 if a<=x<=b then
(if abs(h)<e then вывод(x,f(x))
else goto 2)
else goto 1
e-точность, для того, чтобы не было бесконечного цикла.
f- функция x*x-4( как я понял)
Помогите пожалуйста!!!! Заранее спасибо.

Последний раз редактировалось Stilet; 17.02.2012 в 22:45.
желающий знать вне форума Ответить с цитированием
Старый 15.02.2012, 14:28   #2
TinMan
Форумчанин
 
Аватар для TinMan
 
Регистрация: 05.09.2011
Сообщений: 869
По умолчанию

если
f(x) = x*x-4
, то
f'(x) = 2*x
Предпочитаю на "ты".
TinMan вне форума Ответить с цитированием
Старый 15.02.2012, 15:34   #3
желающий знать
 
Регистрация: 06.11.2011
Сообщений: 6
Радость

спасибо! Только как мне сделать так чтобы процедура считала два значения от одной переменной(f(x) и f '(x))???!
желающий знать вне форума Ответить с цитированием
Старый 16.02.2012, 01:45   #4
TinMan
Форумчанин
 
Аватар для TinMan
 
Регистрация: 05.09.2011
Сообщений: 869
По умолчанию

Цитата:
Сообщение от желающий знать Посмотреть сообщение
спасибо! Только как мне сделать так чтобы процедура считала два значения от одной переменной(f(x) и f '(x))???!
Это сделать легко с помощью var-параметров. Но только я не понимаю, зачем. Можно объединить и кофемолку со стиральной машиной, но станет ли кому-то лучше от этого? Логично сделать f и f' как две разные функции.
Код:
function f(x: double): double;
begin
  f:= x*x - 4
end;

function f1(x: double): double;
begin
  f1:= 2*x
end;
Потом используй их по мере надобности.
Предпочитаю на "ты".
TinMan вне форума Ответить с цитированием
Старый 17.02.2012, 22:22   #5
желающий знать
 
Регистрация: 06.11.2011
Сообщений: 6
Хорошо

Спасибо тебе! Выручил!!
желающий знать вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Программа со стеком и процедурой _Val_ Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM 1 29.11.2010 10:55
Проблемы с процедурой Nigadyai Общие вопросы Delphi 11 05.06.2010 14:15
Подскажите с процедурой KARUSHEV Помощь студентам 6 04.10.2009 20:37
Паскаль. Программа с процедурой. rooman90 Паскаль, Turbo Pascal, PascalABC.NET 0 07.05.2009 18:32
Помогите с процедурой... Arkuz Помощь студентам 10 15.05.2008 08:56