Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
КОМПЬЮТЕРНАЯ МОДЕЛЬ ОЦЕНКИ ЭКОЛОГИЧЕСКОЙ СТАБИЛ...doc
Скачиваний:
1
Добавлен:
01.05.2025
Размер:
16.38 Mб
Скачать

Литература

  1. Бондарев В.П., Зорина Е.Ф., Ковалев С.Н. Гидролого-морфометрические характеристики овражно-балочных систем центра Русской равнины // Геоморфология. 2000. №2. С. 52-58.

  2. Зорина Е.Ф., Ковалев С.Н. Оценка опасности развития овражной эрозии на склоновых землях пригородной зоны г. Набережные Челны // Девятое межвузовское координационное совещание по проблеме эрозионных , русловых и устьевых процессов. Тез. докл. Брянск. 1994. С. 46-48.

  3. Зорина Е.Ф., Ковалев С.Н., Никольская И.И. Подходы к типизации оврагов // Геоморфология. 1998. № 2. с.75-80.

  4. Ковалев С.Н. Влияние овражно-балочных систем на экологию городов // Современные и древние эрозионные процессы. Казань. 2001. С. 85-92

  5. Ковалев С.Н. Овражно-балочная сеть на урбанизированных территориях // Инженерная география. Экология урбанизированных территорий. Тез. докл. Ярославль. 1999. С. 61-65

  6. Ковалев С.Н., Любимов Б.П. Рекреационное использование овражно-балочных систем на урбанизированных территориях // Геоморфология, №4. 2005. С. 83-94

  7. Любимов Б.П., Ковалев С.Н. Зональные и региональные типы оврагов // Геоморфология. 2006. №1 С. 11-19.

Приложение

Рис1.Склоновый овраг Эльбрусского района КБР.

Рис 2 Береговой овраг Черекского района КБР.

Рис 3 Пахотные земли Черекского района КБР.

Рис 4 Модель EPIC

Рис 5 Расчеты по модели EPIC

Рис 6 Некоторые расчетные показатели по районам КБР

Рис 7 Ландшафтная карта

Рис 8 Почвенная карта

Рис 9 Биотические элементы ландшафта

Листинг программы

//---------------------------------------------------------------------------

#include <vcl.h>

#pragma hdrstop

//---------------------------------------------------------------------------

USEFORM("Unit1.cpp", Form1);

USEFORM("Unit2.cpp", Form2);

USEFORM("Unit3.cpp", Form3);

//---------------------------------------------------------------------------

WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)

{

try

{

Application->Initialize();

Application->CreateForm(__classid(TForm1), &Form1);

Application->CreateForm(__classid(TForm2), &Form2);

Application->CreateForm(__classid(TForm3), &Form3);

Application->Run();

}

catch (Exception &exception)

{

Application->ShowException(&exception);

}

catch (...)

{

try

{

throw Exception("");

}

catch (Exception &exception)

{

Application->ShowException(&exception);

}

}

return 0;

}

//---------------------------------------------------------------------------

#ifndef Unit1H

#define Unit1H

//---------------------------------------------------------------------------

#include <Classes.hpp>

#include <Controls.hpp>

#include <StdCtrls.hpp>

#include <Forms.hpp>

#include <DB.hpp>

#include <DBCtrls.hpp>

#include <DBGrids.hpp>

#include <DBTables.hpp>

#include <ExtCtrls.hpp>

#include <Grids.hpp>

#include <ComCtrls.hpp>

#include <ADODB.hpp>

#include <Chart.hpp>

#include <TeEngine.hpp>

#include <TeeProcs.hpp>

#include <Series.hpp>

#include <TeeFunci.hpp>

//---------------------------------------------------------------------------

class TForm1 : public TForm

{

__published: // IDE-managed Components

TPageControl *PageControl1;

TTabSheet *TabSheet1;

TTabSheet *TabSheet2;

TDataSource *DataSource1;

TLabel *Label2;

TGroupBox *GroupBox2;

TComboBox *ComboBox1;

TImage *Image1;

TGroupBox *GroupBox3;

TComboBox *ComboBox2;

TGroupBox *GroupBox5;

TRadioButton *RadioButton6;

TRadioButton *RadioButton7;

TRadioButton *RadioButton8;

TLabel *Label1;

TButton *Button1;

TButton *Button2;

TTable *Table1;

TTable *Table2;

TDataSource *DataSource2;

TGroupBox *GroupBox1;

TChart *Chart1;

TLineSeries *Series1;

TButton *Button3;

void __fastcall FormCreate(TObject *Sender);

void __fastcall ComboBox1Change(TObject *Sender);

void __fastcall Button1Click(TObject *Sender);

void __fastcall Button2Click(TObject *Sender);

void __fastcall Button3Click(TObject *Sender);

private: // User declarations

public: // User declarations

__fastcall TForm1(TComponent* Owner);

};

//---------------------------------------------------------------------------

extern PACKAGE TForm1 *Form1;

//---------------------------------------------------------------------------

#endif

//---------------------------------------------------------------------------

#ifndef Unit2H

#define Unit2H

//---------------------------------------------------------------------------

#include <Classes.hpp>

#include <Controls.hpp>

#include <StdCtrls.hpp>

#include <Forms.hpp>

#include <DB.hpp>

#include <DBTables.hpp>

#include <DBGrids.hpp>

#include <Grids.hpp>

#include <ADODB.hpp>

#include <ComCtrls.hpp>

#include <Buttons.hpp>

//---------------------------------------------------------------------------

class TForm2 : public TForm

{

__published: // IDE-managed Components

TGroupBox *GroupBox1;

TLabel *Label3;

TButton *Button1;

TGroupBox *GroupBox2;

TLabel *Label9;

TButton *Button2;

TLabel *Label1;

TTable *Table1;

TDataSource *DataSource1;

TGroupBox *GroupBox6;

TLabel *Label2;

TButton *Button6;

TButton *Button7;

TButton *Button5;

TGroupBox *GroupBox3;

TLabel *Label10;

TLabel *Label11;

TLabel *Label12;

TEdit *Edit8;

TEdit *Edit9;

TButton *Button3;

TTable *Table2;

TGroupBox *GroupBox5;

TLabel *Label17;

TLabel *Label18;

TLabel *Label19;

TEdit *Edit13;

TEdit *Edit14;

TButton *Button4;

TMonthCalendar *MonthCalendar1;

void __fastcall Button1Click(TObject *Sender);

void __fastcall Button2Click(TObject *Sender);

void __fastcall Button4Click(TObject *Sender);

void __fastcall Button3Click(TObject *Sender);

void __fastcall Button7Click(TObject *Sender);

void __fastcall Button5Click(TObject *Sender);

private: // User declarations

public: // User declarations

__fastcall TForm2(TComponent* Owner);

};

//---------------------------------------------------------------------------

extern PACKAGE TForm2 *Form2;

//---------------------------------------------------------------------------

#endif

//---------------------------------------------------------------------------

#ifndef Unit3H

#define Unit3H

//---------------------------------------------------------------------------

#include <Classes.hpp>

#include <Controls.hpp>

#include <StdCtrls.hpp>

#include <Forms.hpp>

#include <DB.hpp>

#include <DBGrids.hpp>

#include <DBTables.hpp>

#include <Grids.hpp>

#include <DBCtrls.hpp>

#include <ExtCtrls.hpp>

#include <Buttons.hpp>

//---------------------------------------------------------------------------

class TForm3 : public TForm

{

__published: // IDE-managed Components

TDBGrid *DBGrid2;

TDataSource *DataSource1;

TTable *Table1;

TDBGrid *DBGrid1;

TDBNavigator *DBNavigator1;

TDBNavigator *DBNavigator2;

TDBGrid *DBGrid3;

TTable *Table2;

TTable *Table3;

TDataSource *DataSource2;

TDataSource *DataSource3;

TLabel *Label1;

TLabel *Label2;

TLabel *Label3;

private: // User declarations

public: // User declarations

__fastcall TForm3(TComponent* Owner);

};

//---------------------------------------------------------------------------

extern PACKAGE TForm3 *Form3;

//---------------------------------------------------------------------------

#endif

41