Массив из многочленов второго степеня.(Delhpi/Pascal)

[Wild_klas]

Заданный массив многочленов второй степени, состоящий из трех элементов.
Найти тот, для которого определен интеграл приобретает наименьшего значения на определенном отрезке.

Как в массив записать многочлены? Через функцию можно?
Моя попытка:

uses
  SysUtils;

Function Mnogochlen(m1,m2,m3,x:real):real;
Begin
M1:=3*(x*x)+4*x+7;
M2:=6*(x*x)-8*x+3;
M3:=4*(x*x)-x+1;
End;

Type Massiv=array [1..10] of integer;
Const M:massiv of mnogochlen =(M1,m2,m3);

Подскажите, как правильно??

[Genco]

Многочлен - это ж по сути A*x*x+B*x+C , вот и храни такие тройки чисел.

const
 N=10;
//-----------
type
polynom=record
 A,B,C : real;
end;
//--------------
var 
 Mas: array [1..N] of polynom;
//---------------
function CountPolynom(x : real, nn: integer): real;
begin
 Result:=Mas[nn].A*Mas[nn].A*x+Mas[nn].B*x+Mas[nn].C;
end

Имхо,опрятнее.

[Wild_klas]

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

Многочлен - это ж по сути A*x*x+B*x+C , вот и храни такие тройки чисел.

const
 N=10;
//-----------
type
polynom=record
 A,B,C : real;
end;
//--------------
var 
 Mas: array [1..N] of polynom;
//---------------
function CountPolynom(x : real, nn: integer): real;
begin
 Result:=Mas[nn].A*Mas[nn].A*x+Mas[nn].B*x+Mas[nn].C;
end

Имхо,опрятнее.

Да по сути A*x*x+B*x+C многочлен, но мне нужно 3 многочлена записать в масив, чтобы с ними потом дальше работать. Спасибо, но Ваш пример мне не подходит.

[DomiNick]

но мне нужно 3 многочлена записать в масив, чтобы с ними потом дальше работать. Спасибо, но Ваш пример мне не подходит.

Чем ж он не подходит-то? В массиве получатся N записей с коэффициентами...
Вот только опечатка там в CountPolynom - не A в квадрате а X...

И всё-таки в Делфи или в Паскале?

[ybn]

DomiNick
А в чем разница между Delphi и Pascal?
Здесь главное алгоритм.

[Wild_klas]

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

Чем ж он не подходит-то? В массиве получатся N записей с коэффициентами...
Вот только опечатка там в CountPolynom - не A в квадрате а X...

И всё-таки в Делфи или в Паскале?

Это т пример у меня вобще не запускается.
А как тогда дальше решать? задание: Заданный массив многочленов второй степени, состоящий из трех элементов.
Найти тот, для которого определен интеграл приобретает наименьшего значения на определенном отрезке.

А какая разница паскаль или делфи? Если так нужно то делфи

[DomiNick]

А в чем разница между Delphi и Pascal?

Хе-хе... А про С++ и Java тоже чтоль скажите "в чём разница"?

Код, написанный в Pascal, всегда будет компилироваться в Delphi. Обратное утверждение верно далеко не всегда. (с)

Всё зависит от того что именно делать, там много нюансов... Взять хотя бы динамические массивы...
Да и от версии зависит - сейчас уже много "паскалей" развелось...

А как тогда дальше решать? задание: Заданный массив многочленов второй степени, состоящий из трех элементов.
Найти тот, для которого определен интеграл приобретает наименьшего значения на определенном отрезке.

Вы меня чтоль спрашиваете как решать? Я подобных задач уже очень давно не видел...
Сам алгоритм решения у вас есть?