.)
{
Application->MessageBox («Неизвестная ошибка», «Ошибка», MB_ICONERROR — MB_OK);
}
}
//—————————————————————————————————————;
void __fastcall TForm1: BitBtn2Click (TObject *Sender)
{
Close ();
}
4) RezultInterpol. h
#ifndef ResultInterpolH
#define ResultInterpolH
//—————————————————————————————————————;
#include
#include
#include
#include
#include
#include
//—————————————————————————————————————;
class TForm2: public TForm
{
__published: // IDE-managed Components
TPanel *Panel1;
TGroupBox *GroupBox1;
TBitBtn *BitBtn1;
TEdit *Edit1;
TEdit *Edit2;
TEdit *Edit3;
TEdit *Edit4;
TLabel *Label1;
TLabel *Label2;
TLabel *Label3;
TLabel *Label4;
void __fastcall FormShow (TObject *Sender);
void __fastcall FormCreate (TObject *Sender);
private: // User declarations
public: // User declarations
__fastcall TForm2(TComponent* Owner);
};
//—————————————————————————————————————;
extern PACKAGE TForm2 *Form2;
//—————————————————————————————————————;
#endif
5) RezultInterpol. cpp
#include
#pragma hdrstop
#include «ResultInterpol.h»
#include «MainInterpol.h»
//—————————————————————————————————————;
#pragma package (smart_init)
#pragma resource «*.dfm»
TForm2 *Form2;
//—————————————————————————————————————;
__fastcall TForm2: TForm2(TComponent* Owner)
: TForm (Owner)
{
}
//—————————————————————————————————————;
void __fastcall TForm2: FormShow (TObject *Sender)
{
Edit1->Text = FloatToStrF (Form1->n, ffFixed, 4, 4);
Edit2->Text = FloatToStrF (Form1->k, ffFixed, 4, 4);
Edit3->Text = FloatToStrF (Form1->d, ffFixed, 4, 4);
Edit4->Text = FloatToStrF (Form1->r, ffFixed, 4, 4);
}
//—————————————————————————————————————;
void __fastcall TForm2: FormCreate (TObject *Sender)
{
}
Распределение концентрации компонента, А во времени t, Са (t)
Концентрация Са, моль/л Время t, c 2,2 0 1,7 1,7 1,5 2,5 1,4 3,1 1,2 3,8 1,1 4,5 ЗАКЛЮЧЕНИЕ
В курсовом проекте приведен пример создания программного обеспечения для исследования кинетики химических реакций с помощью инструментальной среды разработки приложений С++ Builder на языке С++.
В ходе исследования удалось проследить изменение концентрации химических веществ в реакции.
Форма ввода исходных данных, отображение экспериментальных значений и расчетных кривых концентраций
Форма отображения результатов расчета
Результаты расчета:
Порядок реакции n=0,1
Константа скорости реакции k=0,14 1/c
Проверка адекватности модели:
Дисперсия d=102,7 (моль/л)2
Коэффициент корреляции r=0,69
Архангельский А. Я. Программирование в С++ Builder6 (разработка программ для Windows, методический и справочные материалы по С++ Builder6) / А. Я. Архангельский и М. А. Тагин. — М.: БИНОМ, 2007, — 1181с.
Иванова Г. С. Объектно-ориентированное программирование / Г. С. Иванова, Т. Н. Ничушкина, Е. К. Пугачев; под ред. Г. С. Ивановой. — Изд. 3-е, стер. — М.: Изд-во МГТУ, 2007. — 320 с.
Лекции по дисциплине «Программирование на языках высокого уровня» Р. В. Антипин, И. В. Новожилова. — 50 с.
Страуструп. Язык программирования С++, Бъерн Страуструп, пер. с английского С.
Анисимова, М. Кононова. Под ред. Ф. Андреева, А. Ушакова. — спец. издание
М.; Бином; СПб.: Нев. Диалект, 2001, — 1098 с.
Чистякова Т. Б. Программирование на языках высокого уровня Базовый курс: учебное пособие для студентов заочной формы обучения / Т. Б. Чистякова, Р. В. Антипин, И. В. Новожилова. — СПб.: СПбГТИ (ТУ), 2008.-227 с.
Шилдт Герберт. С++. Базовый курс / Герберт Шилдт; [пер. с англ. Н.М. Ручко] .- 3-е изд. — М.: Вильямс, 2008. 610 с.
t = t[i] - t[i-1], Cb = Cb + k * pow (Ca, n) * t,
Cc = Cc + k * 2 * pow (Ca, n) * t,
Ca = Ca — k * pow (Ca, n) * t
d += pow (Ca[i] - Ca, 2)
k = exp ((s3 * s4 — s2 * s5) / (s1 * s4 — s2 * s2)),
n = (s1 * s5 — s2 * s3) / (s1 * s4 — s2 * s2),
r = (s1 * s5 — s2 * s3) / sqrt ((s1 * s4 — s2 * s2) *
* (s1 * s6 — s3 * s3))
y[i] = log (Ca[i+2] - Ca[i+1]) / log (t[i+2] - t[i+1]), x[i] = log (t[i+1]),
s1 = N — 1, s2 += x[i], s3 += y[i], s4 +=x[i] * x[i],
s5 += x[i] * y[i], s6 += y[i] * y[i]
конец
k, n, r, d
Да
Нет
i > N-1
i=i+1
Cb (t), Cc (t), d
Нет
Да
i >N-1
i=0
i=i+1
k, n, r
s1, s2, s3, s4, s5, s6
i=0
Да
Да
Да
Нет
Да
Время и концентрация не могут быть отрицательными
Нарушение последовательности ввода времени
Концентрация в соседних точках должна быть различна
Начальные концентрации компонентов должны быть больше 0
Изменение концентрации исходного компонента Са (t), начальные концентрации компонентов Cb, Сс, количество замеров концентрации N
Да
i=i+1
t[i]<0 — Ca[i]<0
t[i]>=t[i+1]
Ca[i]==Ca[i+1]
i > N-1
i=0
!Ca — Cb<0.0 -;
Cc<0.0
Ca (t), Cb, Cc, N
начало
