Решения определенных интегралов методом трапеций

@NikSchibeki · Регистрация: 15.10.2013

Студворк — интернет-сервис помощи студентам

Здравствуйте, мне необходимо разработать Приложение для численного решения определенных интегралов методом
трапеций.
В интернете много всего расписано, сделал программу (прикрепляю), проверял на функции sin(x) с пределами интегрирования от 0 до 3 - получаю 1.98 (проверял на онлайн-калькуляторе - всё верно - https://math24.biz/integral_trapezoid )
Проблема в следующем:
как реализовать ввод функции с edit? Уже два часа пытался что-то найти - не удалось. Я ввожу функцию программно:

Delphi
1
2
3
4
 function f(x:real):real;
begin
 f:=sin(x)
end;

Еще необходимо нарисовать график функции Tchart
Я нашёл подобную работу на курсовике, пытаюсь скопировать ее, естественно исходник платный
Прошу помощи.

@NikSchibeki · 10.03.2019, 17:47 **[ТС]**

Прикрепляю само задание.
В своей программе пользовался данным материалом - https://wiki.mininuniver.ru/in... B%D1%8C_16

@Puporev · 10.03.2019, 17:49

Сообщение от NikSchibeki

Прикрепляю само задание.

И где здесь написано что функции нужно вводить в Эдит?

@NikSchibeki · 10.03.2019, 17:52 **[ТС]**

Puporev, вы правы, не написано, как проще можно реализовать? Я понял, что с edit, видимо, не получится. Читал, что можно через парсер, но как не знаю.

@Puporev · 10.03.2019, 17:54

Да нафига тут парсер? Функция где-то должна быть в задании.

@NikSchibeki · 10.03.2019, 18:00 **[ТС]**

Puporev, нет, какая именно функция в задании не уточнено.

@NikSchibeki · 11.03.2019, 12:21 **[ТС]**

Всё, сделал сам. Использовал парсинг - MathComp
Программу прикрепляю. Знаю, что код костыльный, но работает

@Puporev · 11.03.2019, 13:14

Вроде в коде программы не хватает

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
procedure TForm1.Button1Click(Sender: TObject);
var a,b,x:real;
    n,i:integer;
    h:real;
   a1, b1, s1, ul, ul1, It1, gr:real;
   MathParser1:TMathParser;//этого
begin
   a:=StrToFloat(Edit1.Text);
   b:=StrToFloat(Edit2.Text);
   n:=StrToInt(Edit3.Text);
   h:=(b-a)/n;
   MathParser1:=TMathParser.Create(LabeledEdit1);//и этого

@NikSchibeki · 11.03.2019, 20:38 **[ТС]**

Puporev, эм, зачем?

@Puporev · 11.03.2019, 20:42

Ну я пробовал запустить проект, сразу выскочила ошибка на строке

Delphi
1
 MathParser1.Variables.Clear;

мол не знаю никакого MathParser1.

@NikSchibeki · 11.03.2019, 20:51 **[ТС]**

Puporev, так компонент установи (сам парсер), я прикрепил же

@Puporev · 11.03.2019, 20:53

А если это написать, то и компонент не нужен.

@NikSchibeki · 11.03.2019, 20:59 **[ТС]**

Puporev, ну да, потому что MathPars.pas есть в папке с проеком

@Puporev · 11.03.2019, 21:00

Ну не столько MathPars.pas, сколько MathPars.dcu

@NikSchibeki · 11.03.2019, 21:02 **[ТС]**

Puporev, именно)

@D1973 · 12.03.2019, 06:39

Не по теме:

Сообщение от NikSchibeki

так компонент установи

Ну и нахрена бы он мне в IDE сдался, если можно pas-файл прицепить и две строчки написать...

Новые блоги и статьи Все статьи Все блоги /
Access VikBal 11.12.2025 Помогите пожалуйста !! Как объединить 2 одинаковые БД Access с разными данными.	Новый ноутбук volvo 07.12.2025 Всем привет. По скидке в "черную пятницу" взял себе новый ноутбук Lenovo ThinkBook 16 G7 на Амазоне: Ryzen 5 7533HS 64 Gb DDR5 1Tb NVMe 16" Full HD Display Win11 Pro	Музыка, написанная Искусственным Интеллектом volvo 04.12.2025 Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .	От async/await к виртуальным потокам в Python IndentationError 23.11.2025 Армин Ронахер поставил под сомнение async/ await. Создатель Flask заявляет: цветные функции - провал, виртуальные потоки - решение. Не threading-динозавры, а новое поколение лёгких потоков. Откат?. . .	Поиск "дружественных имён" СОМ портов Argus19 22.11.2025 Поиск "дружественных имён" СОМ портов На странице: https:/ / norseev. ru/ 2018/ 01/ 04/ comportlist_windows/ нашёл схожую тему. Там приведён код на С++, который показывает только имена СОМ портов, типа,. . .
Сколько Государство потратило денег на меня, обеспечивая инсулином. Programma_Boinc 20.11.2025 Сколько Государство потратило денег на меня, обеспечивая инсулином. Вот решила сделать интересный приблизительный подсчет, сколько государство потратило на меня денег на покупку инсулинов. . . .	Ломающие изменения в C#.NStar Alpha Etyuhibosecyu 20.11.2025 Уже можно не только тестировать, но и пользоваться C#. NStar - писать оконные приложения, содержащие надписи, кнопки, текстовые поля и даже изображения, например, моя игра "Три в ряд" написана на этом. . .	Мысли в слух kumehtar 18.11.2025 Кстати, совсем недавно имел разговор на тему медитаций с людьми. И обнаружил, что они вообще не понимают что такое медитация и зачем она нужна. Самые базовые вещи. Для них это - когда просто люди. . .	Создание Single Page Application на фреймах krapotkin 16.11.2025 Статья исключительно для начинающих. Подходы оригинальностью не блещут. В век Веб все очень привыкли к дизайну Single-Page-Application . Быстренько разберем подход "на фреймах". Мы делаем одну. . .	Фото: Daniel Greenwood kumehtar 13.11.2025

@NikSchibeki 16 / 10 / 6 Регистрация: 15.10.2013 Сообщений: 208
	10.03.2019, 17:47 [ТС]
	Прикрепляю само задание. В своей программе пользовался данным материалом - https://wiki.mininuniver.ru/in... B%D1%8C_16 Миниатюры 0

@NikSchibeki 16 / 10 / 6 Регистрация: 15.10.2013 Сообщений: 208
	10.03.2019, 17:52 [ТС]
	Puporev, вы правы, не написано, как проще можно реализовать? Я понял, что с edit, видимо, не получится. Читал, что можно через парсер, но как не знаю. 0

@Puporev Почетный модератор 64314 / 47610 / 32743 Регистрация: 18.05.2008 Сообщений: 115,168
	10.03.2019, 17:54
	Да нафига тут парсер? Функция где-то должна быть в задании. 0

@NikSchibeki 16 / 10 / 6 Регистрация: 15.10.2013 Сообщений: 208
	10.03.2019, 18:00 [ТС]
	Puporev, нет, какая именно функция в задании не уточнено. 0

@NikSchibeki 16 / 10 / 6 Регистрация: 15.10.2013 Сообщений: 208
	11.03.2019, 20:38 [ТС]
	Puporev, эм, зачем? 0

@NikSchibeki 16 / 10 / 6 Регистрация: 15.10.2013 Сообщений: 208
	11.03.2019, 20:51 [ТС]
	Puporev, так компонент установи (сам парсер), я прикрепил же 0

@Puporev Почетный модератор 64314 / 47610 / 32743 Регистрация: 18.05.2008 Сообщений: 115,168
	11.03.2019, 20:53
	А если это написать, то и компонент не нужен. 0

@NikSchibeki 16 / 10 / 6 Регистрация: 15.10.2013 Сообщений: 208
	11.03.2019, 20:59 [ТС]
	Puporev, ну да, потому что MathPars.pas есть в папке с проеком 0

@Puporev Почетный модератор 64314 / 47610 / 32743 Регистрация: 18.05.2008 Сообщений: 115,168
	11.03.2019, 21:00
	Ну не столько MathPars.pas, сколько MathPars.dcu 0

@NikSchibeki 16 / 10 / 6 Регистрация: 15.10.2013 Сообщений: 208
	11.03.2019, 21:02 [ТС]
	Puporev, именно) 0