Top.Mail.Ru
Ответы

Помогите пожалуйста, нужно рассортировать двумерный массив, в пояснение вся прога, пожалуйста кто может исправьте

#include
#pragma hdrstop

#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"

//Размер массива
int const n = 15;
int const m = 10;

//Максимальное значение в массиве
int numMas = 100;

//Минимум, положение в строке, положение в столбце
int min,minI,minJ;

//Создаем файл
ofstream fout ("output.txt");

//Заполняем массив
void masFill();

TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TОкно:: TОкно (TComponent* Owner)
: TForm(Owner)
//Вписываем в стрингрид с n строками и m столбами
{
StringGrid1 -> ColCount = m;
StringGrid1 -> RowCount = n;
masFill();

int i,j;
for (i = 0; i < n; i++)
{
for (j = 0; j < m; j++)
{
StringGrid1 -> Cells[j][i] = obj.masA[i][j];
}
}
//Открываем файл
fout.open("output.txt");
//Выводим в файл массив
for (i = 0; i < n; i++) {
for (j = 0; j < m; j++) {
fout << obj.masA[i][j];
fout << '\t';
}
fout << '\n';
}
//Выводим в файл значения
fout << "Min = ";
fout << min;
fout << '\n';
fout << "MinI = ";
fout << minI;
fout << '\n';
fout << "MinJ = ";
fout << minJ;
fout << '\n';
//закрываем файл
fout.close();
}

void masFill()
{
int i,j;
for (i = 0; i < n; i++) {
for (j = 0; j < m; j++) {
obj.masA[i][j] = rand() % numMas;
}
}
}

void SearchMin()
{
min = obj.masB[0];
int k = 0;
int i;
for (i = 1; i < (n*m); i++) {
if(min>obj.masB[i]) {
min = obj.masB[i];
k = i;
}
}

minI = k / m;
minJ = k % m;

MessageDlg("min = "+IntToStr(min),mtInformation,TMsgDlgButtons() << mbOK,NULL);
MessageDlg("minI = "+IntToStr(minI),mtInformation,TMsgDlgButtons() << mbOK,NULL);
MessageDlg("minJ = "+IntToStr(minJ),mtInformation,TMsgDlgButtons() << mbOK,NULL);
}
//---------------------------------------------------------------------------
void __fastcall TForm3::StringGrid1Click(TObject *Sender)
{

}

Дополнен

работаю в "Embarcadero RAD studio 10.1" в файле "VSL Froms Application c++ Builder"

Дополнен

при пуске работы дает ошибку и жалуется на ofstream fout ("output.txt");

По дате
По рейтингу
Аватар пользователя
Оракул
8лет

Ты нашел написанную программу в гугле куда то ее воткнул (по моему это вообще IDE от delphi ) файл создать не удосужился и жалуешься почему не работает . Я все правильно понял ?

Аватар пользователя
Знаток
8лет

Это IDE, создай файл с ofstream fout ("output.txt") который просит

Аватар пользователя
Знаток
8лет

хрень какаято

Аватар пользователя
Знаток
8лет

лол

Аватар пользователя
Мудрец
8лет

Ищи код на delphi, а не на С/С++