Блок Схема

@lexis · Регистрация: 26.03.2012

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

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

В 1 Блок схеме(Поиск минимума,всего у меня 9 функций,) должно быть всё то,что есть в подпрограмме ButtonClick1 в коде ниже.Только не разбивать всё в отдельные блок схемы,а просто разъединять соединителями например круглишком и внутри него цифра 1 2 3 4 5 6 7 8 9.
Во 2-й Блок схеме(Поиск максимума,всего у меня 9 функций,) должно быть всё,что есть в подпрограмме ButtonClick2 в коде ниже. и в коде выше,где объявляются библиотеки у меня объявляются функции их тоже нужно разместить как-то в отдельных блок схемах.
Остальные кнопки я уже составил в отдельные блок схемы,Прошу помощи у вас форумчане.Отблагодарю Всех кто отзовётся! спасибо!

Вот код

C++

//---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
#include <math>
#include <iostream>
#include <string.h>
#include <conio.h>
#include <stdlib.h>
#include <iomanip.h>
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
double a, b, g, h, fu1, fu2,eps; //Объявления имён типа double
TForm1 *Form1;
using namespace std; //Пространство имен std; используется глобально
double f(double x) //Объявление функции с переменной типа double
{
  return  pow(M_E,x)*sin(x*x-2*x+11); //возвращение функции
}
double ab(double i)//Объявление функции ab с именем i типа double
{
  if(i<0)return -i;else return i; //выполняется условие,если i<0 то возвращается минимум,иначе максимум
}
double f1(double x)//Объявление функции с переменной типа double
{
  return  sin(x*x-2*x*11); //возвращение функции
}
double ab1(double i)//Объявление функции ab1 с именем i типа double
{
  if(i<0)return -i;else return i; //выполняется условие,если i<0 то возвращается минимум,иначе максимум
}
double f2(double x)//Объявление функции с переменной типа double
{
return  cos(2*x+3*4);//возвращение функции
}
double ab2(double i)//Объявление функции ab2 с значением i типа double
{
  if(i<0)return -i;else return i;//выполняется условие,если i<0 то возвращается минимум,иначе максимум
}
double f3(double x)//Объявление функции с переменной типа double
{
  return  sin(2*x)/3*x;//возвращение функции
}
double ab3(double i)//Объявление функции ab3 с значением i типа double
{
  if(i<0)return -i;else return i;//выполняется условие,если i<0 то возвращается минимум,иначе максимум
}
double f4(double x) //Объявление функции с переменной типа double
{
  return  1/tan(x/2+5*x)+pow(x,3);//возвращение функции
}
double ab4(double i)//Объявление функции ab4 с значением i типа double
{
  if(i<0)return -i;else return i;//выполняется условие,если i<0 то возвращается минимум,иначе максимум
}
double f5(double x)//Объявление функции с переменной типа double
{
  return  1/tan(x*10/5*x)+pow(x,3);//возвращение функции
}
double ab5(double i)//Объявление функции ab5 с значением i типа double
{
  if(i<0)return -i;else return i;//выполняется условие,если i<0 то возвращается минимум,иначе максимум
}
double f6(double x)//Объявление функции с переменной типа double
{
  return  -1*(x*x*x)+9*(x*x)-24*x-2;//возвращение функции
}
double ab6(double i)//Объявление функции ab6 с значением i типа double
{
  if(i<0)return -i;else return i;//выполняется условие,если i<0 то возвращается минимум,иначе максимум
}
double f7(double x)//Объявление функции с переменной типа double
{
  return  2*x*x + (-19)*x + 20;//возвращение функции
}
double ab7(double i)//Объявление функции ab7 с значением i типа double
{
  if(i<0)return -i;else return i;//выполняется условие,если i<0 то возвращается минимум,иначе максимум
}
double ff(double x)//Объявление функции с переменной типа double
{
  return  x*x*x-4*x*x-11*x+30;//возвращение функции
}
double bb(double i)//Объявление функции bb с значением i типа double
{
  if(i<0)return -i;else return i;//выполняется условие,если i<0 то возвращается минимум,иначе максимум
}
double ff1(double x)//Объявление функции с переменной типа double
{
  return  x*x*x-7*pow(2,x)*x+30;//возвращение функции
}
double bb1(double i) //Объявление функции bb1 с значением i типа double
{
  if(i<0)return -i;else return i;//выполняется условие,если i<0 то возвращается минимум,иначе максимум
}
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
 
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
  a=StrToFloat(Edit1->Text); // Ввод и считывание значения a
  b=StrToFloat(Edit2->Text);//Ввод и считывание значения b
  eps=StrToFloat(Edit3->Text);//Ввод и считывание значения eps
//
if (ComboBox1->ItemIndex==0)//Расчёт по формуле pow(M_E,x)*sin(x*x-2*x+11)
{
for(int i=-1;i<=1;i+=2)//Сначало ищем минимум, затем максимум
  {
    g = a+(b-a)*(0.38);//Расчёт точки
    h = b-0.38*(b-a);//Расчёт точки
    fu1 = i*f(g);//Расчёт значения fu1
    fu2 = i*f(h);  //Расчёт значения fu2
      do //Оператор цикла
      {
       if( fu1<=fu2 )//Выполняем условие,для того,чтобы найти минимум
       {
         b = h;//присваиваем значение и в след строке выводим точку минимума
         h = g;//точка минимума
         fu2 = fu1; // присваиваем значения
         g = a+(b-a)*(0.38);  //Основная формула вычисления точки минимума
         fu1 = i*f(g);//вычисляется значение минимума через функцию
Edit5->Text=fu1;//Вывод значения минимума
        }
      }
     while(ab(a-b)>eps); //Условие выхода
        (fu1-fu2)/2+fu2 ;
        i==-1;//после этого проверяем условие if(i<0)return -i;else return i;
        //выполняется условие
        //если i<0 то возвращается минимум,иначе максимум
Edit7->Text=g; //вывод точки минимума
  }
}
if (ComboBox1->ItemIndex==1)//Расчёт по формуле sin(x*x-2*x*11)
{
for(int i=-1;i<=1;i+=2)//Сначало ищем минимум, затем максимум
  {
    g = a+(b-a)*(0.38);//Расчёт точки
    h = b-0.38*(b-a); //Расчёт точки
    fu1 = i*f1(g);//Расчёт точки fu1
    fu2 = i*f1(h);//Расчёт точки fu2
      do //Оператор цикла
      {
       if( fu1<=fu2 )//Выполняем условие,для того,чтобы найти минимум
       {
         b = h;//присваиваем значение и в след строке выводим точку минимума
         h = g; //точка минимума
         fu2 = fu1;
         g = a+(b-a)*(0.38); //Основная формула вычисления точки минимума
         fu1 = i*f1(g);//вычисляется значение минимума через функцию
Edit5->Text=fu1;//Вывод значения минимума
       }
      }
     while(ab1(a-b)>eps); //Условие выхода
        (fu1-fu2)/2+fu2;
        i==-1;//после этого проверяем условие if(i<0)return -i;else return i;
        //выполняется условие
        //если i<0 то возвращается минимум,иначе максимум
Edit7->Text=g;//вывод точки минимума
  }
}
if (ComboBox1->ItemIndex==2)//Расчёт по формуле cos(2*x+3*4)
{
for(int i=-1;i<=1;i+=2)//Сначало ищем минимум, затем максимум
   {
    g = a+(b-a)*(0.38);//Расчёт точки
    h = b-0.38*(b-a); //Расчёт точки
    fu1 = i*f2(g);//Расчёт точки fu1
    fu2 = i*f2(h);//Расчёт точки fu2
      do //Оператор цикла
      {
       if( fu1<=fu2 ) //Выполняем условие,для того,чтобы найти минимум
       {
        b = h;//присваиваем значение и в след строке выводим точку минимума
        h = g;//точка минимума
        fu2 = fu1;
        g = a+(b-a)*(0.38);//Основная формула вычисления точки минимума
        fu1 = i*f2(g);//вычисляется значение минимума через функцию
Edit5->Text=fu1;//Вывод значения минимума
       }
      }
     while(ab2(a-b)>eps); //Условие выхода
        (fu1-fu2)/2+fu2;
        i==-1;//после этого проверяем условие if(i<0)return -i;else return i;
        //выполняется условие
        //если i<0 то возвращается минимум,иначе максимум
Edit7->Text=g;//вывод точки минимума
   }
}
 if (ComboBox1->ItemIndex==3)//Расчёт по формуле sin(2*x)/3*x
{
for(int i=-1;i<=1;i+=2)//Сначало ищем минимум, затем максимум
   {
    g = a+(b-a)*(0.38);//Расчёт точки
    h = b-0.38*(b-a); //Расчёт точки
    fu1 = i*f3(g); //Расчёт точки fu1
    fu2 = i*f3(h); //Расчёт точки fu2
      do //Оператор цикла
      {
       if( fu1<=fu2 ) //Выполняем условие,для того,чтобы найти минимум
       {
        b = h;//присваиваем значение и в след строке выводим точку минимума
        h = g;//точка минимума
        fu2 = fu1;
        g = a+(b-a)*(0.38);//Основная формула вычисления точки минимума
        fu1 = i*f3(g);//вычисляется значение минимума через функцию
Edit5->Text=fu1;//Вывод значения минимума
       }
      }
     while(ab3(a-b)>eps); //Условие выхода
     (fu1-fu2)/2+fu2;
     i==-1;//после этого проверяем условие if(i<0)return -i;else return i;
     //выполняется условие
     //если i<0 то возвращается минимум,иначе максимум
Edit7->Text=g;//вывод точки минимума
   }
}
if (ComboBox1->ItemIndex==4)//Расчёт по формуле ctan(x/2+5*x)+pow(x,3)
{
for(int i=-1;i<=1;i+=2)//Сначало ищем минимум, затем максимум
   {
    g = a+(b-a)*(0.38);//Расчёт точки
    h = b-0.38*(b-a);//Расчёт точки
    fu1 = i*f4(g);//Расчёт точки fu1
    fu2 = i*f4(h);//Расчёт точки fu2
      do //Оператор цикла
      {
       if( fu1<=fu2 ) //Выполняем условие,для того,чтобы найти минимум
        {
        b = h;//присваиваем значение и в след строке выводим точку минимума
        h = g;//точка минимума
        fu2 = fu1;
        g = a+(b-a)*(0.38);//Основная формула вычисления точки минимума
        fu1 = i*f4(g);//вычисляется значение минимума через функцию
Edit5->Text=fu1;//Вывод значения минимума
        }
      }
     while(ab4(a-b)>eps); //Условие выхода
     (fu1-fu2)/2+fu2;
      i==-1;//после этого проверяем условие if(i<0)return -i;else return i;
    //выполняется условие
    //если i<0 то возвращается минимум,иначе максимум
Edit7->Text=g;//вывод точки минимума
   }
}
if (ComboBox1->ItemIndex==5)//Расчёт по формуле 1/tan(x*10/5*x)+pow(x,3)
{
for(int i=-1;i<=1;i+=2)//Сначало ищем минимум, затем максимум
   {
   g = a+(b-a)*(0.38);//Расчёт точки
   h = b-0.38*(b-a);//Расчёт точки
   fu1 = i*f5(g);//Расчёт точки fu1
   fu2 = i*f5(h);//Расчёт точки fu2
      do //Оператор цикла
      {
      if( fu1<=fu2 ) //Выполняем условие,для того,чтобы найти минимум
       {
       b = h;//присваиваем значение и в след строке выводим точку минимума
       h = g;//точка минимума
       fu2 = fu1;
       g = a+(b-a)*(0.38);//Основная формула вычисления точки минимума
       fu1 = i*f5(g);//вычисляется значение минимума через функцию
Edit5->Text=fu1;//Вывод значения минимума
       }
      }
    while(ab5(a-b)>eps); //Условие выхода
    (fu1-fu2)/2+fu2;
     i==-1;//после этого проверяем условие if(i<0)return -i;else return i;
      //выполняется условие
      //если i<0 то возвращается минимум,иначе максимум
Edit7->Text=g;//Вывод значения минимума
   }
}
if (ComboBox1->ItemIndex==6)//Расчёт по формуле -1*(x*x*x)+9*(x*x)-24*x-2
{
for(int i=-1;i<=1;i+=2)//Сначало ищем минимум, затем максимум
   {
   g = a+(b-a)*(0.38);//Расчёт точки
   h = b-0.38*(b-a);//Расчёт точки
   fu1 = i*f6(g);//Расчёт точки fu1
   fu2 = i*f6(h);//Расчёт точки fu2
   do //Оператор цикла
    {
     if( fu1<=fu2 ) //Выполняем условие,для того,чтобы найти минимум
     {
     b = h;//присваиваем значение и в след строке выводим точку минимума
     h = g;//точка минимума
     fu2 = fu1;
     g = a+(b-a)*(0.38);//Основная формула вычисления точки минимума
     fu1 = i*f6(g);//вычисляется значение минимума через функцию
Edit5->Text=fu1;//Вывод значения минимума
     }
    }
   while(ab6(a-b)>eps); //Условие выхода
   (fu1-fu2)/2+fu2;
    i==-1;//после этого проверяем условие if(i<0)return -i;else return i;
    //выполняется условие
    //если i<0 то возвращается минимум,иначе максимум
Edit7->Text=g;//Вывод значения минимума
   }
}
if (ComboBox1->ItemIndex==7)//Расчёт по формуле 2*x*x + (-19)*x + 20
{
for(int i=-1;i<=1;i+=2)//Сначало ищем минимум, затем максимум
   {
   g = a+(b-a)*(0.38);//Расчёт точки
   h = b-0.38*(b-a);//Расчёт точки
   fu1 = i*f7(g);//Расчёт точки fu1
   fu2 = i*f7(h);//Расчёт точки fu2
   do //Оператор цикла
    {
     if( fu1<=fu2 ) //Выполняем условие,для того,чтобы найти минимум
     {
     b = h;//присваиваем значение и в след строке выводим точку минимума
     h = g;//точка минимума
     fu2 = fu1;
     g = a+(b-a)*(0.38);//Основная формула вычисления точки минимума
     fu1 = i*f7(g);//вычисляется значение минимума через функцию
Edit5->Text=fu1;//Вывод значения минимума
     }
    }
   while(ab7(a-b)>eps); //Условие выхода
   (fu1-fu2)/2+fu2;
   i==-1;//после этого проверяем условие if(i<0)return -i;else return i;
   //выполняется условие
   //если i<0 то возвращается минимум,иначе максимум
Edit7->Text=g;//Вывод значения минимума
   }
}
if (ComboBox1->ItemIndex==8)//Расчёт по формуле x*x*x-4*x*x-11*x+30
{
for(int i=-1;i<=1;i+=2)//Сначало ищем минимум, затем максимум
   {
   g = a+(b-a)*(0.38);//Расчёт точки
   h = b-0.38*(b-a);//Расчёт точки
   fu1 = i*ff(g);//Расчёт точки fu1
   fu2 = i*ff(h);//Расчёт точки fu2
   do //Оператор цикла
    {
     if( fu1<=fu2 ) //Выполняем условие,для того,чтобы найти минимум
     {
     b = h;//присваиваем значение и в след строке выводим точку минимума
     h = g;//точка минимума
     fu2 = fu1;
     g = a+(b-a)*(0.38);//Основная формула вычисления точки минимума
     fu1 = i*ff(g);//вычисляется значение минимума через функцию
Edit5->Text=fu1;//Вывод значения минимума
     }
    }
    while(bb(a-b)>eps); //Условие выхода
    (fu1-fu2)/2+fu2;
    i==-1;//после этого проверяем условие if(i<0)return -i;else return i;
    //выполняется условие
//если i<0 то возвращается минимум,иначе максимум
Edit7->Text=g;//Вывод значения минимума
}
}
if (ComboBox1->ItemIndex==9)//Расчёт по формуле x*x*x-7*pow(2,x)*x+30
{
for(int i=-1;i<=1;i+=2)//Сначало ищем минимум, затем максимум
   {
   g = a+(b-a)*(0.38);//Расчёт точки
   h = b-0.38*(b-a);//Расчёт точки
   fu1 = i*ff1(g);//Расчёт точки fu1
   fu2 = i*ff1(h);//Расчёт точки fu2
   do //Оператор цикла
    {
     if( fu1<=fu2 ) //Выполняем условие,для того,чтобы найти минимум
     {
     b = h;//присваиваем значение и в след строке выводим точку минимума
     h = g;//точка минимума
     fu2 = fu1;
     g = a+(b-a)*(0.38);//Основная формула вычисления точки минимума
     fu1 = i*ff1(g);//вычисляется значение минимума через функцию
Edit5->Text=fu1;//Вывод значения минимума
     }
    }
   while(bb1(a-b)>eps); //Условие выхода
   (fu1-fu2)/2+fu2;
   i==-1;//после этого проверяем условие if(i<0)return -i;else return i;
   //выполняется условие
   //если i<0 то возвращается минимум,иначе максимум
Edit7->Text=g;//Вывод значения минимума
   }
}
}
//---------------------------------------------------------------------------
 
 
void __fastcall TForm1::Button2Click(TObject *Sender)
{
  a=StrToFloat(Edit1->Text); // Ввод и считывание значения a
  b=StrToFloat(Edit2->Text);//Ввод и считывание значения b
  eps=StrToFloat(Edit3->Text);//Ввод и считывание значения eps
if (ComboBox1->ItemIndex==0)//Расчёт по формуле pow(M_E,x)*sin(x*x-2*x+11)
{
for(int i=1;i<=1;i+=2)//Сначало ищем минимум, затем максимум
   {
   g = a+(b-a)*(0.38); //Расчёт точки
   h = b-0.38*(b-a); //Расчёт точки
   fu1 = i*f(g); //Расчёт точки fu1
   fu2 = i*f(h); //Расчёт точки fu2
   do //Оператор цикла
    {
    if( fu1>=fu2 )//Выполняем условие,для того,чтобы найти максимум
     {
     a = g;//присваиваем значение и в след строке выводим точку максимума
     g = h; //точка максимума
     fu1 = fu2;
     h = b-0.38*(b-a);  //Основная формула вычисления точки максимума
     fu2 = i*f(h);//вычисляется значение максимума через функцию
Edit6->Text=fu2; //Вывод значения максимума
     }
    }
   while(ab(a-b)>eps); //Условие выхода
   (fu1-fu2)/2+fu2 ;
    i=1;//после этого проверяем условие if(i<0)return -i;else return i;
    //выполняется условие
Edit8->Text=h;//Вывод точки максимума
   }
}
if (ComboBox1->ItemIndex==1)//Расчёт по формуле sin(x*x-2*x*11)
{
for(int i=1;i<=1;i+=2)//Сначало ищем минимум, затем максимум
   {
   g = a+(b-a)*(0.38); //Расчёт точки
   h = b-0.38*(b-a); //Расчёт точки
   fu1 = i*f1(g);//Расчёт точки fu1
   fu2 = i*f1(h);//Расчёт точки fu2
    do //Оператор цикла
     {
     if( fu1>=fu2 )//Выполняем условие,для того,чтобы найти максимум
      {
      a = g;//присваиваем значение и в след строке выводим точку максимума
      g = h; //точка максимума
      fu1 = fu2;
      h = b-0.38*(b-a);  //Основная формула вычисления точки максимума
      fu2 = i*f1(h);//вычисляется значение максимума через функцию
Edit6->Text=fu2; //Вывод значения максимума
      }
     }
    while(ab1(a-b)>eps); //Условие выхода
    (fu1-fu2)/2+fu2;
     i=1;//после этого проверяем условие if(i<0)return -i;else return i;
     //выполняется условие
Edit8->Text=h; //Вывод точки максимума
   }
}
if (ComboBox1->ItemIndex==2)//Расчёт по формуле cos(2*x+3*4)
{
for(int i=1;i<=1;i+=2)//Сначало ищем минимум, затем максимум
   {
   g = a+(b-a)*(0.38);//Расчёт точки
   h = b-0.38*(b-a); //Расчёт точки
   fu1 = i*f2(g);//Расчёт точки fu1
   fu2 = i*f2(h); //Расчёт точки fu2
    do //Оператор цикла
     {
     if( fu1>=fu2 )//Выполняем условие,для того,чтобы найти максимум
      {
      a = g;//присваиваем значение и в след строке выводим точку максимума
      g = h;//точка максимума
      fu1 = fu2;
      h = b-0.38*(b-a);//Основная формула вычисления точки максимума
      fu2 = i*f2(h);//вычисляется значение максимума через функцию
Edit6->Text=fu2;//Вывод точки максимума
      }
     }
    while(ab2(a-b)>eps); //Условие выхода
    (fu1-fu2)/2+fu2;
    i=1;//после этого проверяем условие if(i<0)return -i;else return i;
    //выполняется условие
Edit8->Text=h; //Вывод точки максимума
   }
}
if (ComboBox1->ItemIndex==3) //Расчёт по формуле  sin(2*x)/3*x
{
for(int i=1;i<=1;i+=2)//Сначало ищем минимум, затем максимум
   {
   g = a+(b-a)*(0.38);//Расчёт точки
   h = b-0.38*(b-a);//Расчёт точки
   fu1 = i*f3(g);//Расчёт точки fu1
   fu2 = i*f3(h);//Расчёт точки fu2
    do //Оператор цикла
     {
     if( fu1>=fu2 ) //Выполняем условие,для того,чтобы найти максимум
      {
      a = g;//присваиваем значение и в след строке выводим точку максимума
      g = h; //точка максимума
      fu1 = fu2;
      h = b-0.38*(b-a);//Основная формула вычисления точки максимума
      fu2 = i*f3(h);//вычисляется значение максимума через функцию
Edit6->Text=fu2;//Вывод значения максимума
      }
     }
    while(ab3(a-b)>eps); //Условие выхода
    (fu1-fu2)/2+fu2;
    i=1;//после этого проверяем условие if(i<0)return -i;else return i;
    //выполняется условие
Edit8->Text=h;//Вывод точки максимума
   }
}
if (ComboBox1->ItemIndex==4) //Расчёт по формуле  ctan(x/2+5*x)+pow(x,3)
{
for(int i=1;i<=1;i+=2)//Сначало ищем минимум, затем максимум
   {
   g = a+(b-a)*(0.38);//Расчёт точки
   h = b-0.38*(b-a);//Расчёт точки
   fu1 = i*f4(g);//Расчёт точки fu1
   fu2 = i*f4(h);//Расчёт точки fu2
    do//Оператор цикла
     {
     if( fu1>=fu2 )//Выполняем условие,для того,чтобы найти максимум
      {
      a = g;//присваиваем значение и в след строке выводим точку максимума
      g = h;//точка максимума
      fu1 = fu2;
      h = b-0.38*(b-a); //Основная формула вычисления точки максимума
      fu2 = i*f4(h);//вычисляется значение максимума через функцию
Edit6->Text=fu2;//Вывод значения максимума
      }
     }
    while(ab4(a-b)>eps); //Условие выхода
    (fu1-fu2)/2+fu2;
    i=1;//после этого проверяем условие if(i<0)return -i;else return i;
    //выполняется условие
Edit8->Text=h;//Вывод точки максимума
   }
}
if (ComboBox1->ItemIndex==5) //Расчёт по формуле 1/tan(x*10/5*x)+pow(x,3)
{
for(int i=1;i<=1;i+=2)//Сначало ищем минимум, затем максимум
   {
   g = a+(b-a)*(0.38);//Расчёт точки
   h = b-0.38*(b-a);//Расчёт точки
   fu1 = i*f5(g);//Расчёт точки fu1
   fu2 = i*f5(h);//Расчёт точки fu2
    do//Оператор цикла
     {
     if( fu1>=fu2 )//Выполняем условие,для того,чтобы найти максимум
      {
      a = g;//присваиваем значение и в след строке выводим точку максимума
      g = h;//точка максимума
      fu1 = fu2;
      h = b-0.38*(b-a);//Основная формула вычисления точки максимума
      fu2 = i*f5(h);//вычисляется значение максимума через функцию
Edit6->Text=fu2;//Вывод значения максимума
      }
     }
    while(ab5(a-b)>eps); //Условие выхода
    (fu1-fu2)/2+fu2;
    i=1;//после этого проверяем условие if(i<0)return -i;else return i;
    //выполняется условие
Edit8->Text=h; //Вывод точки максимума
   }
}
if (ComboBox1->ItemIndex==6) //Расчёт по формуле -1*(x*x*x)+9*(x*x)-24*x-2
{
for(int i=1;i<=1;i+=2)//Сначало ищем минимум, затем максимум
   {
   g = a+(b-a)*(0.38);//Расчёт точки
   h = b-0.38*(b-a);//Расчёт точки
   fu1 = i*f6(g); //Расчёт точки fu1
   fu2 = i*f6(h); //Расчёт точки fu2
    do //Оператор цикла
     {
     if( fu1>=fu2 )//Выполняем условие,для того,чтобы найти максимум
      {
      a = g;//присваиваем значение и в след строке выводим точку максимума
      g = h;//точка максимума
      fu1 = fu2;
      h = b-0.38*(b-a);//Основная формула вычисления точки максимума
      fu2 = i*f6(h);//вычисляется значение максимума через функцию
Edit6->Text=fu2;//Вывод значения максимума
      }
     }
    while(ab6(a-b)>eps); //Условие выхода
    (fu1-fu2)/2+fu2;
    i=1;//после этого проверяем условие if(i<0)return -i;else return i;
    //выполняется условие
Edit8->Text=h;//Вывод точки максимума
   }
}
if (ComboBox1->ItemIndex==7) //Расчёт по формуле 2*x*x + (-19)*x + 20
{
for(int i=1;i<=1;i+=2)//Сначало ищем минимум, затем максимум
   {
   g = a+(b-a)*(0.38);//Расчёт точки
   h = b-0.38*(b-a);//Расчёт точки
   fu1 = i*f7(g); //Расчёт точки fu1
   fu2 = i*f7(h); //Расчёт точки fu2
    do //Оператор цикла
     {
     if( fu1>=fu2 ) //Выполняем условие,для того,чтобы найти максимум
      {
      a = g;//присваиваем значение и в след строке выводим точку максимума
      g = h; //точка максимума
      fu1 = fu2;
      h = b-0.38*(b-a);//Основная формула вычисления точки максимума
      fu2 = i*f7(h); //вычисляется значение максимума через функцию
Edit6->Text=fu2;//Вывод значения максимума
      }
     }
    while(ab7(a-b)>eps); //Условие выхода
    (fu1-fu2)/2+fu2;
    i=1;//после этого проверяем условие if(i<0)return -i;else return i;
    //выполняется условие
Edit8->Text=h; //Вывод точки максимума
   }
}
if (ComboBox1->ItemIndex==8) //Расчёт по формуле x*x*x-4*x*x-11*x+30
{
for(int i=1;i<=1;i+=2)//Сначало ищем минимум, затем максимум
   {
   g = a+(b-a)*(0.38); //Расчёт точки
   h = b-0.38*(b-a);//Расчёт точки
   fu1 = i*ff(g);//Расчёт точки fu1
   fu2 = i*ff(h);//Расчёт точки fu2
    do//Оператор цикла
     {
     if( fu1>=fu2 )//Выполняем условие,для того,чтобы найти максимум
      {
      a = g;//присваиваем значение и в след строке выводим точку максимума
      g = h; //точка максимума
      fu1 = fu2;
      h = b-0.38*(b-a);//Основная формула вычисления точки максимума
      fu2 = i*ff(h); //вычисляется значение максимума через функцию
Edit6->Text=fu2;//Вывод значения максимума
      }
     }
    while(bb(a-b)>eps); //Условие выхода
    (fu1-fu2)/2+fu2;
    i=1;//после этого проверяем условие if(i<0)return -i;else return i;
    //выполняется условие
    Edit8->Text=h;//Вывод точки максимума
   }
}
if (ComboBox1->ItemIndex==9) //Расчёт по формуле x*x*x-7*pow(2,x)*x+30
{
for(int i=1;i<=1;i+=2)//Сначало ищем минимум, затем максимум
   {
   g = a+(b-a)*(0.38); //Расчёт точки
   h = b-0.38*(b-a); //Расчёт точки
   fu1 = i*ff1(g);//Расчёт точки fu1
   fu2 = i*ff1(h);//Расчёт точки fu2
    do//Оператор цикла
     {
     if( fu1>=fu2 )//Выполняем условие,для того,чтобы найти максимум
      {
      a = g;//присваиваем значение и в след строке выводим точку максимума
      g = h;//точка максимума
      fu1 = fu2;
      h = b-0.38*(b-a);//Основная формула вычисления точки максимума
      fu2 = i*ff1(h);//вычисляется значение максимума через функцию
Edit6->Text=fu2;//Вывод значения максимума
      }
     }
    while(bb1(a-b)>eps); //Условие выхода
    (fu1-fu2)/2+fu2;
    i=1;//после этого проверяем условие if(i<0)return -i;else return i;
    //выполняется условие
Edit8->Text=h;//Вывод точки максимума
   }
   }
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Button3Click(TObject *Sender)
{
Edit1->Clear();//очищает введённые ранее данные через кнопку Очистить введённые ранее данные
Edit2->Clear();//очищает введённые ранее данные через кнопку Очистить введённые ранее данные
Edit3->Clear();//очищает введённые ранее данные через кнопку Очистить введённые ранее данные
Edit5->Clear();//очищает введённые ранее данные через кнопку Очистить введённые ранее данные
Edit6->Clear();//очищает введённые ранее данные через кнопку Очистить введённые ранее данные
Edit7->Clear();//очищает введённые ранее данные через кнопку Очистить введённые ранее данные
Edit8->Clear();//очищает введённые ранее данные через кнопку Очистить введённые ранее данные
 
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Button4Click(TObject *Sender)
{
Close();//закрытие программы через кнопку
}
//---------------------------------------------------------------------------
void __fastcall TForm1::N2Click(TObject *Sender)
{
Edit1->Clear();//очищает введённые ранее данные с помощью клавиши del
Edit2->Clear();//очищает введённые ранее данные с помощью клавиши del
Edit3->Clear();//очищает введённые ранее данные с помощью клавиши del
Edit5->Clear();//очищает введённые ранее данные с помощью клавиши del
Edit6->Clear();//очищает введённые ранее данные с помощью клавиши del
Edit7->Clear();//очищает введённые ранее данные с помощью клавиши del
Edit8->Clear();//очищает введённые ранее данные с помощью клавиши del
 
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::N3Click(TObject *Sender)
{
Close(); //закрытие программы с помощью клавиши esc       
}
//---------------------------------------------------------------------------

@OstapBender · 09.06.2012, 16:12

кропотливая и довольно энергоёмкая работа, сильно сомневаюсь что задаром кто-то будет делать ...

@lexis · 09.06.2012, 16:37 **[ТС]**

Я понимаю,но я тоже буду принимать в этом участие,уже делаю блок схемы,позже скину.

Добавлено через 2 минуты
Как комбобокс в блок схеме отмечается?

@OstapBender · 09.06.2012, 16:39

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

Как комбобокс в блок схеме отмечается?

никак

@lexis · 09.06.2012, 16:45 **[ТС]**

В Принципе легко всё,спасибо!

позже выложу блок схемы,проверите

Добавлено через 3 минуты
Я через ромб комбобокс сделал,если мы выбрали 1 функцию,то вычисляем в ней минимум,иначе выбираем другую функцию,как-то так сделал.

Добавлено через 2 минуты
Уже включаю там сами функции по очерёдно f1,f2 и т.д.,так же и с максимумом поступлю,пишу одну огромную блоксхему для поиска минимум 9 функций разделяю круглешками,и потом буду для максимума так же писать блок схемы

@OstapBender · 09.06.2012, 19:43

блок-схемы пишутся для функций, а комбо бокс - элемент интерфейса

@OstapBender 594 / 532 / 76 Регистрация: 22.03.2011 Сообщений: 1,585
	09.06.2012, 16:12	2
	кропотливая и довольно энергоёмкая работа, сильно сомневаюсь что задаром кто-то будет делать ... 1

@lexis 18 / 18 / 6 Регистрация: 26.03.2012 Сообщений: 130 Записей в блоге: 2
	09.06.2012, 16:37 [ТС]	3
	Я понимаю,но я тоже буду принимать в этом участие,уже делаю блок схемы,позже скину. Добавлено через 2 минуты Как комбобокс в блок схеме отмечается? 0

@OstapBender 594 / 532 / 76 Регистрация: 22.03.2011 Сообщений: 1,585
	09.06.2012, 16:39	4
	Сообщение от lexis Как комбобокс в блок схеме отмечается? никак 0

@lexis 18 / 18 / 6 Регистрация: 26.03.2012 Сообщений: 130 Записей в блоге: 2
	09.06.2012, 16:45 [ТС]	5
	В Принципе легко всё,спасибо!позже выложу блок схемы,проверите Добавлено через 3 минуты Я через ромб комбобокс сделал,если мы выбрали 1 функцию,то вычисляем в ней минимум,иначе выбираем другую функцию,как-то так сделал. Добавлено через 2 минуты Уже включаю там сами функции по очерёдно f1,f2 и т.д.,так же и с максимумом поступлю,пишу одну огромную блоксхему для поиска минимум 9 функций разделяю круглешками,и потом буду для максимума так же писать блок схемы 0

@OstapBender 594 / 532 / 76 Регистрация: 22.03.2011 Сообщений: 1,585
	09.06.2012, 19:43	6
	блок-схемы пишутся для функций, а комбо бокс - элемент интерфейса 0

Опции темы