Вопрос по информатике:
Отдам все баллы,только помогите....
напишите программу паскаль для вычисления данного примера
X^2=5cos(x-1)
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 01.10.2016 12:28
- Информатика
- remove_red_eye 1750
- thumb_up 12
Ответы и объяснения 1
f(x) обратится в 0 , если cos(x-1) > 0 => - pi/2 < x
=> (2 - pi)/2 < x < (2 + pi)/2
Корня будет два. Определим интервал для первого корня.
Левая граница а = - 0,57, правая граница b = 1
Для второго корня левая граница а = 1, правая b = 2
корни будем находить методом деления пополам.
Интервал [ a, b] делится пополам и определяется знак функции в этой точке, в зависимости от знака изменяется левая или правая граница интервала.
Программа будет следующей:
function f(x: real): real;
begin
f:=x*x-5*cos(x-1);
end;
{ основная программа }
var a,b,c,eps: real;
k: integer;
{ a - начало интервала, b - конец }
begin
write('a = '); readln(a);
write('b = '); readln(b);
if f(a)*f(b)<0 then
begin
write('точность вычислений eps: '); readln(eps);
k:=1;
while abs(a-b)>eps do
begin
c:=(a+b)/2;
if f(c)0 then
begin
if f(c)*f(b)<0 then
a:=c
else
b:=c
end;
k:=k+1;
end;
writeln('корень = ',a:12:8);
writeln('количество итераций: ',k);
end
else
writeln('интервал задан неверно');
end.
a = -0.57
b = 1
точность вычислений eps: 0.00001
корень = -0.51726021
количество итераций: 19
a = 1
b = 2
точность вычислений eps: 0.00001
корень = 1.83345795
количество итераций: 18
- 02.10.2016 21:04
- thumb_up 19
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.