- •Уфимский государственный авиационный технический университет
- •Разработка прикладного алгоритма
- •Пояснительная записка
- •Уфимский государственный авиационный технический университет
- •Функция изменения времени вычисления от объема исходных данных
- •Разработка алгоритма программы в виде блок-схемы.
- •Описание функций среды программирования Microsoft Visual Studio 6
- •Создание проекта
- •Описание работы программы.
- •Приложение а
- •Приложение б
- •Приложение в
Приложение б
void CSearchDlg::OnReadfile()
{UpdateData(1);
CStdioFile m_File;
if ( !m_File.Open(m_FileName+CString(".txt"),
CFile::modeRead | CFile::typeText) )
{MessageBox("Ошибка открытия файла", "Информация", MB_ICONEXCLAMATION);
return;
}
pInt = new int[m_NUM];
if (pInt == NULL)
{MessageBox("Ошибка создания массива", "Информация", MB_ICONEXCLAMATION);
return;
}
IntNum = 0;
CString str;
m_DATABOX.ResetContent();
while ( m_File.ReadString(str) != NULL)
{pInt[IntNum++] = atoi(str.GetBuffer(0));
m_DATABOX.AddString(str);
}
m_File.Close();
UpdateData(0);
CString fg;
fg.Format("Данные считаны успешно. Всего %i элемента(ов)",IntNum);
MessageBox(fg, "Информация", MB_ICONINFORMATION);
}
Приложение в
void CSearchDlg::OnDosearch()
{if ((pInt == NULL)||(IntNum<1))
{CClientDC MyDC(GetDlgItem(IDC_LISTDATA));
CRect Rect;
CWnd *pWnd = MyDC.GetWindow();
pWnd->GetClientRect( &Rect );
MyDC.FillSolidRect( &Rect, RGB(230,0,0) );
{MessageBox("Искать нечего","Информация", MB_ICONINFORMATION);
return;
}}
UpdateData(1);
if (m_search==0)
{ this->RedrawWindow();
CClientDC MyDC(GetDlgItem(IDC_SEARCH));
CRect Rect;
CWnd *pWnd = MyDC.GetWindow();
pWnd->GetClientRect( &Rect );
MyDC.FillSolidRect( &Rect, RGB(255,0,0) );
{MessageBox("Введите значение для поиска", "Информация", MB_ICONEXCLAMATION);
return;
}}
this->RedrawWindow();
pInt[m_NUM+1]=m_search;
clock_t start, finish;
start = clock();
for (int n=0; pInt[n] != m_search; n++) ;
finish = clock();
m_SEARCHTIME.Format("%1.12f сек",(double)(finish - start)/CLOCKS_PER_SEC);
UpdateData(0);
if (n < m_NUM+1)
{CClientDC MyDC(GetDlgItem(IDC_LISTDATA));
CRect Rect;
CWnd *pWnd = MyDC.GetWindow();
pWnd->GetClientRect( &Rect );
MyDC.FillSolidRect( &Rect, RGB(0,255,0) );
{MessageBox(" Файл найден", "Информация", MB_ICONINFORMATION);
return;
}}
else MessageBox(" Файл НЕ найден", "Информация", MB_ICONEXCLAMATION );}