Материал: Лабораторная работа №6

Внимание! Если размещение файла нарушает Ваши авторские права, то обязательно сообщите нам

a[i] = NCH;

}

}

}

SomeProjectDLL::Class1::Vivod(CH, s);

SomeProjectDLL::Class1::Vivod(NCH, k);

SomeProjectDLL::Class1::Vivod(countCH, d);

SomeProjectDLL::Class1::Vivod(countNCH, n);

}

void Class1::VSTAVKA(int k, int* mas, int n, int m) {

int i;

for (i = n; i > (k+1) ; i--) {

mas[i + 1] = mas[i];

}

mas[k + 1] = m;

n++;

}

void Class1::PROSOYVSTAVKA( int* mas, int n){

int x,j;

for (int i = 2; i < n; i++) {

x = mas[i];

mas[0]=x;

j = i - 1;

while (x < mas[j]) {

mas[j + 1] = mas[j];

j = j - 1;

}

mas[j + 1] = x;

}

void Class1::add(void) {

ADOX::Catalog^ k = gcnew ADOX::CatalogClass();

try

{

k->Create("Provider = Microsoft.Jet.OLEDB.4.0; Data Source = " + Application::StartupPath +"\\Databasesssss.mdb");

MessageBox::Show("База данных успешно создана", "База данных");

}

catch (System::Runtime::InteropServices::COMException ^ situation)

{

MessageBox::Show(situation->Message);

}

finally

{

k = nullptr;

}

}

void Class1::add_struct(void)

{

auto p = gcnew OleDbConnection("Provider = Microsoft.Jet.OLEDB.4.0; Data Source =" + Application::StartupPath +"\\Databasesssss.mdb");

p->Open();

auto c = gcnew OleDbCommand("CREATE TABLE [Labaratory6] (Nomber_element counter,ishod_mass char(200),vstavka_mass char(200),sort_vstavkoy char(200))",p);

try {

c->ExecuteNonQuery();

MessageBox::Show("База данных успешно создана", "База данных");

}

catch (System::Runtime::InteropServices::COMException ^ situation) {

MessageBox::Show(situation->Message);

}

p->Close();

}

void Class1::add_zap(int* mass, int* rezmas, int* rezmas1, int len) {

for (int i = 0; i < len; i++) {

auto p = gcnew OleDbConnection("Provider = Microsoft.Jet.OLEDB.4.0; Data Source =" + Application::StartupPath +"\\Databasesssss.mdb");

p->Open();

auto c = gcnew OleDbCommand("INSERT INTO [Labaratory6](" + "[ishod_mass],[vstavka_mass],[sort_vstavkoy])VALUES('" + mass[i] + "','" + rezmas[i] + "','" + rezmas1[i] + "')");

c->Connection = p;

c->ExecuteNonQuery();

p->Close();

}

MessageBox::Show("", "База данных");

}

}

  1. Тестирование программы

Ввожу количество элементов массива, значения элемента и позицию в массиве (рисунок 5 и рисунок 6)

Рисунок 5 – Результат работы программы

Рисунок 6 – Результат работы программы

Рисунок 7 – Результат работы программы

Рисунок 8 – Результат работы программы

Рисунок 9 – Результат работы программы

Список использованной литературы:

  1. ГОСТ 7.1-2003 Библиографическая запись. Библиографическое описание. – М., 2004. – 166 с.

  2. ГОСТ 7.32-2017 СИБИД. Отчет о научно-исследовательской работе. Структура и правила оформления. – М., 2017. – 28 с.

Источник: https://studfile.net/preview/16555964/