Вызов консоли через приложение.

#include <vcl.h>
#include <iostream>
#pragma hdrstop
 
#include "Unit1.h"
 
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
 
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
 
 
void __fastcall TForm1::Button1Click(TObject *Sender)
{
 std::cout << "hello world" <<std::endl;
 system ("pause");
}

system ("start echo Hello World");

ShellExecute (Sender, "open", "C:\\myconsole.exe", NULL, NULL, SW_SHOWNORMAL );

#include <vcl.h>
#include <iostream.h>
#include <math.h>
 
int main()
{
    
    double a[5][5]=
        {
        {-3.17, 1, 0, 0, 0},
        {1,-2, 1, 0, 0},
        {0, 1,-2, 1, 0},
        {0, 0, 1, -2,1},
        {0, 0, 0, 1, -3.17}
    };
    double b[5]={0,1,1,1,0};
    
    for(int k=0;k<4;k++)
    {
        
        int p=k;
        for(int m=k+1;m<5;m++)
        {
            if ( fabs(a[p][k]) < fabs(a[m][k]) )
                p=m;
 
        }
        double r;
 
        
        for(int j=k;j<5;j++)
        {
            r=a[k][j];
            a[k][j]=a[p][j];
            a[p][j]=r;
            
        }       
        
        r=b[k];
        b[k]=b[p];
        b[p]=r;
 
        
        for(int m=k+1;m<5;m++)
        {
            double c=a[m][k]/a[k][k];
            b[m]=b[m]-c*b[k];
            for(int i=k;i<5;i++)
            {
                a[m][i]=a[m][i]-c*a[k][i];
            }
        }
    }
 
    
    double x[5];
    x[4]=b[4]/a[4][4];
 
    for(int k=3;k>=0;k--)
    {
        double s=0;
        for(int i=k+1;i<5;i++)
        {
            s+=a[k][i]*x[i];
        }
        x[k]=(b[k]-s)/a[k][k];
    }
 
    
 
    for(int i=0;i<5;i++)
        cout<< "x= "<< x[i]<<" "<<endl;
    cout<<endl;
 
 
    double delta=0,t;
    double A[5][5]={
        {-3.17, 1, 0, 0, 0},
        {1,-2, 1, 0, 0},
        {0, 1,-2, 1, 0},
        {0, 0, 1, -2,1},
        {0, 0, 0, 1, -3.17}
    };
    double B[5]={0,1,1,1,0};
    for(int i=0;i<5;i++)
    {
        t=0;
        for(int j=0;j<5;j++)
        {
            t+=A[i][j]*x[j];
        }
        t=fabs(B[i]-t);
        if (delta<t) delta=t;
    }
    std::cout<<"D="<<delta<<std::endl;
 
        system("pause");
    return 0;
}