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("", "База данных");
}
}
Ввожу количество элементов массива, значения элемента и позицию в массиве (рисунок 5 и рисунок 6)
Рисунок 5 – Результат работы программы
Рисунок 6
– Результат работы программы
Рисунок 7 – Результат работы программы
Рисунок 8 – Результат работы программы
Рисунок 9 – Результат работы программы
ГОСТ 7.1-2003 Библиографическая запись. Библиографическое описание. – М., 2004. – 166 с.
ГОСТ 7.32-2017 СИБИД. Отчет о научно-исследовательской работе. Структура и правила оформления. – М., 2017. – 28 с.