Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
Pascal Вычислить значение суммы 1. Дано натуральное n. Вычислить значение суммы Составить блок-схему https://www.cyberforum.ru/ pascal/ thread3086686.html Pascal Получить и вывести новое вещественное число, в котором поменяны местами целая и дробная часть исходного числа
Разработайте программу на языке ABC Pascal для решения следующей задачи. Дано вещественное (действительное) число R вида xxx.yyy (по три разряда в целой и дробной части числа). Получить и вывести новое вещественное число, в котором поменяны местами целая и дробная часть исходного числа. Форма вывода ответа: Исходное число: -527.954 Его целая часть: 527 Его дробная часть: 954...
Pascal Описать тип с данными о мониторах: наименование, цена, количество. Отсортировать по наименованию. Сделать выборку по все На паскале нужно написать. Тема: Использование типов пользовательских данных https://www.cyberforum.ru/ pascal/ thread3085712.html Pascal Исправить программу вычисления элементов вектора Составить программу для вычисления элементов вектора Х по формуле: x_j\ =\ \cos ^2x_{j-1}+\sqrt{\left| \ln x_{j-2}\right|},\ \ j\ =\ 2,\,3,\,...,\,n program Project1; var x: array of real; { Переменная для хранения массива.} n: integer; { Переменная для хранения значения количества элементов в массиве.} https://www.cyberforum.ru/ pascal/ thread3085372.html
Pascal Проверка делимости 3 чисел на 11
Добрый день. Помогите решить задачу Известен следующий признак делимости числа n на 11: для делимости на 11 необходимо, чтобы разность между суммой цифр, стоящих на четных местах, и суммой цифр, стоящих на нечетных местах, делилась на 11. Написать процедуры проверки признака делимости. Даны три натуральных числа. Проверить для каждого из них, делятся ли они на 11. Вот моя программа:...
Pascal Вычислить значения выражений https://www.cyberforum.ru/ pascal/ thread3085033.html
Вычислить значения выражений: program task3; var z,x,y:real; begin writeln('Введите число X'); readln(x); if (x <= -0.5) then y:=ln(abs(((exp(4*ln(x)))+2.3*(exp(3*ln(x))+1))/(sin(x)*sin(x)*sin(x)))) else if (x > -0.5) then y:=1+(x/sqrt(abs(x*(sin(x)/cos(x))))); writeln(y);
Pascal Вычислить сумму ряда https://www.cyberforum.ru/ pascal/ thread3082737.html
Вычислить сумму ряда
Приближенно вычислить интегралы, используя метод средних прямоугольников при n =100 Pascal
Приближенно вычислить интегралы, используя метод средних прямоугольников при n =100
Pascal Вычислить сумму ряда с заданной точностью https://www.cyberforum.ru/ pascal/ thread3082731.html
Не используя стандартные функции (за исключением abs), вычислить с точностью до 0.0001 функцию y=f(x). Считать, что требуемая точность достигнута, если очередное слагаемое по модулю меньше 0.0001, все последующие слагаемые можно уже не учитывать.
Pascal Вычислить произведение Вычислить произведение https://www.cyberforum.ru/ pascal/ thread3082730.html
Протабулировать функцию Pascal
Сформировать таблицу значений функции у = f(x) на отрезке с шагом h в виде: x 0 0.1 ... 1 sin(x) 0.000 0.010 ... 0.841 (y = sin x, a = 0, b = 1, h = 0.1) Задание: y = 10x, a = 0, b = 2, h = 0.2.
Pascal Определить, в какую из областей попадает точка с заданными координатами https://www.cyberforum.ru/ pascal/ thread3082467.html
Определить, в какую из областей - І, II, III (см. рисунок) - попадает точка с заданными координатами. Для простоты принять, что точка не попадает на границы областей.
0 / 0 / 0
Регистрация: 05.03.2023
Сообщений: 4
0

Метод деления пополам - Pascal - Ответ 16789640

05.03.2023, 23:32. Показов 736. Ответов 3
Метки (Все метки)

Author24 — интернет-сервис помощи студентам
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
var a,b,e,c,i,o,f :real;
 f:= ((1-x)/x)-3*cos(4*x);
 
 a:=1.100814;
 b:=-0.505;
 i:=0.00001;
 e:=1;
 begin
 while ((b-a)/2)>i do
 end;
  begin
  c:=(b+a)/2;
  o:=(b-a)/2;
  if f(a)*f(c)<=b then b:=c else a:=c;
  end;
 
  Writeln('Кол-во шагов-', e , 'погрешность-', abs((b-a)/2) );
Программа должна вычислять за сколько шагов ответ будет меньше или равен погрешности(0.00001), но программа выдает ошибку

Вернуться к обсуждению:
Метод деления пополам Pascal
0
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
05.03.2023, 23:32
Готовые ответы и решения:

Метод деления отрезка пополам для решения нелинейных уравнений (метод дихотомии)
Здравствуйте. Помогите пожалуйста дописать программу. Вот что вымучал, но на сдаче завалили, типо...

метод деления отрезка пополам и метод итерации
Методом деления отрезка пополам и методом итерации найти приближенное значение корня 2*x^3+3*x-1=0 ...

Метод деления пополам
плиз!!!подскажите!!! нам дана функция х*х-2=0,мы знаем отрезок на котором будем искать иксы,...

метод деления пополам
Люди помогите составить программу алгоритма метода деления пополам рекурсией на C/C++, для...

3
05.03.2023, 23:32
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
05.03.2023, 23:32
Помогаю со студенческими работами здесь

метод деления пополам вроде
не могу понять в чем ошибка... #include &lt;stdio.h&gt; #include &lt;math.h&gt; #include &lt;conio.h&gt; main...

метод деления интервала пополам
помогите написать программку в вижуале у меня неполучается, нужно функцию на заданом интервале...

Метод деления отрезка пополам
Добрый день. На одной из лаб надо найти корни двух уравнений методом деления отрезка пополам. Все...

Метод деления отрезка пополам
Здравствуйте, нужно реализовать метод деления отрезка пополам. Дано уравнение: x3-5x2+2x+8=0 и...

Метод деления отрезка пополам
Помогите!! Написать функцию,выполняющую поиск корня уравнения f(x)=0 методом деления отрезка...

Метод «деления отрезка пополам»
Доброе время суток! Помогите, пожалуйста, довести программу до ума. Итерационный процесс будет...

Минимум Функции (метод деления отрезка пополам)
Подскажите пожалуйста, Мне нужно найти методом деления отрезка пополам минимум функции одной...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru