Курсовая работа: Оптимизация многомерной нелинейной функции. Слепой поиск
{**************************************}
if (ComboBox1. Text='-') and (ComboBox2. Text='-') and (ComboBox3. Text='-')
then
y:=A*(x1*x1*x1) – B*(x2*x2) – C*x1 – D*x2;
if (ComboBox1. Text='-') and (ComboBox2. Text='-') and (ComboBox3. Text='+')
then
y:=A*(x1*x1*x1) – B*(x2*x2) – C*x1 + D*x2;
if (ComboBox1. Text='-') and (ComboBox2. Text='+') and (ComboBox3. Text='-')
then
y:=A*(x1*x1*x1) – B*(x2*x2) + C*x1 – D*x2;
if (ComboBox1. Text='+') and (ComboBox2. Text='-') and (ComboBox3. Text='-')
then
y:=A*(x1*x1*x1) + B*(x2*x2) – C*x1 – D*x2;
if (ComboBox1. Text='+') and (ComboBox2. Text='+') and (ComboBox3. Text='-')
then
y:=A*(x1*x1*x1) + B*(x2*x2) + C*x1 – D*x2;
if (ComboBox1. Text='-') and (ComboBox2. Text='+') and (ComboBox3. Text='+')
then
y:=A*(x1*x1*x1) – B*(x2*x2) + C*x1 + D*x2;
if (ComboBox1. Text='+') and (ComboBox2. Text='+') and (ComboBox3. Text='+')
then
y:=A*(x1*x1*x1) + B*(x2*x2) + C*x1 + D*x2;
if (ComboBox1. Text='+') and (ComboBox2. Text='-') and (ComboBox3. Text='+')
then
y:=A*(x1*x1*x1) + B*(x2*x2) – C*x1 + D*x2;
ifi=1 then
begin
x1opt:=x1;
x2opt:=x2;