Отчет[1]

1. Томский государственный университет систем управления и радиоэлектроники Кафедра радиоэлектронных технологий и экологического монитор

Томский государственный университет систем управления и радиоэлектроники
Кафедра радиоэлектронных технологий и экологического мониторинга
ОТЧЕТ ПО УЧЕБНОЙ (ВЫЧИСЛИТЕЛЬНОЙ) ПРАКТИКЕ
ВЫПОЛНИЛ: СТУДЕНТ ГР. 215-1
ВАЛЕВИЧ Н.Ю.
ПРОВЕРИЛ: ДОЦЕНТ КАФЕДРЫ РЭТЭМ
СОЛДАТОВА Л.Ю

2. 1 Введение

На сегодняшний день перед человечеством стоит множество экологических
проблем. Данные проблемы невозможно решить без помощи информационных
технологий. Эти технологии играют важную роль во всех сферах человеческой
деятельности, поскольку они значительно упрощают работу эколога на
предприятии. Современному экологу необходимы программные средства,
связанные с экологическими расчетами. В настоящее время рынок предлагает
большой выбор программ для экологов в области окружающей среды.
Целью учебной (вычислительной) практики [2] является закрепление
знаний, полученных при изучении курса информатики, развитие навыков
использования информационных технологий, вычислительной техники и
компьютерных сетей для решения учебных и профессиональных задач,
cоставление и защита отчёта [3].

3. 2 Изучение программы «Животноводство» компании “ЭКО центр”

Программа предназначена для расчета выброса
загрязняющих веществ от процессов механической обработки
древесины, производства щепы, пропитки, прессования и
склеивания на предприятиях деревообрабатывающей
промышленности с использованием удельных показателей.
Программа работает с Базами данных которые сама и
создает. Базы данных содержат информацию по каждому
загрязняющему веществу выбрасываемые предприятием.
Программа разработана с применением современных
информационных технологий, оснащена дружественным
интерфейсом и проста в изучении и эксплуатации.

4. Вход в программу

Рисунок 2.1- Основное окно работы с данными

5. Главное окно программы

Программа «Животноводство» представлена тремя основными
разделами
1)
Расчеты
2)
Справочники
3)
Параметры

6. 3 Разработка программного продукта. Методика

За основу данной программы я взял формулы из программы “Животноводство”.
Годовой выброс загрязняющих веществ M, т/год, определяется по формуле
(3.1.1):
Mi = ∑Min (3.1.1)
где i – условное обозначение загрязняющего вещества;
Min - мощность выделения от каждой группы животных одного вида,
объединенных общих технологическим процессом.
Максимально разовый выброс загрязняющих веществ Gin, г/с, определяется
по формуле (3.1.2):
Gin = Yin·N·q (3.1.2)
где Yin – величина удельного выделения i-го загрязняющего вещества,
установленная для животных определенного вида, участвующих в общем
технологическом процессе, 10-6 г/с × 1 центнер живой массы (для
микроорганизмов: клеток/с × 1 центнер живой массы);

7.

N - количество животных, содержащихся на объекте;
q - средняя масса животного, центнер.
Произведение N·q может быть заменено на массу всех
животных содержащихся на объекте
сельскохозяйственного животноводства.
Годовой выброс загрязняющих веществ Min, т/год,
определяется по формуле (3.1.3):
Min = K·Yin·N·q
(3.1.3)
где K – коэффициент перехода от размерности г/с к
размерности т/год. Для дневного года K = 10-6·365·24·3600 =
31,536.

8. Алгоритм выполнения программы

Ввод данных с клавиатуры согласно запросу;
Расчет выделения загрязняющих веществ в атмосферу;
Вывод результата расчета.

9. Рисунок 3.1- Программа по расчету количества выбросов загрязняющих веществ в атмосферу от животноводческих комплексов и звероферм.

10. Окно вывода

Рисунок 3.2- Работа программы

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

Program См_расчет_выделения_загрязняющих_веществ_при_животноводстве;
Var M,G,Y,N,q,K,u:real;
Begin
Writeln('мощность выделения от каждой группы животного одного вида M');
Readln(M);
Writeln('максимальный разовый выброс загрязняющих веществ G');
Readln(G);
Writeln('величина удельного выделения загрязняющего вещества Y');
Readln(Y);
Writeln('количество животных содержащихся на объекте N');
Readln(N);
Writeln('средняя масса животного q');
Readln(q);
G:=Y*N*q;
M:=Y*N*q*31.536;
Writeln('выберите формулу вычисления максимального разового выброса загрязняющих веществ (1)');
Writeln('или годового выброса загрязняющих веществ (2)');
Readln(u);
if u=1 then
Writeln ('максимальное выделение ', G);
if u=2 then
Writeln ('Годовой выброс ', M);
end.

12. 4 Заключение

Целью учебной (вычислительной) практики было закрепление знаний, полученных при
изучении курса информатики, развитие навыков использования информационных
технологий, вычислительной техники и компьютерных сетей для решения учебных
задач.
Достижение данной цели было осуществлено с помощью самостоятельного
изучения Интернет-ресурсов, специальной программы для экологов и языком
программирования Pascal.
В ходе практики была освоена работа с программой, разработанной для экологов
“Животноводство”. Также, я познакомился с методиками для проведения
экологических расчетов выброса вредных веществ в атмосферу в процессе выделений
загрязняющих веществ от объектов сельскохозяйственного животноводства. Освоение
подобных программ в будущем поможет мне в работе экологом.
Также, в ходе работы я ознакомился с языком высокого программирования Pascal.
Используя этот язык, на основе программы животноводство я написал свою программу
по расчету выделений загрязняющих веществ от объектов сельскохозяйственного
животноводства. В дальнейшем, это поможет мне в работе с компьютером.
Также, я познакомился с методиками для проведения экологических расчетов
выделений загрязняющих веществ в атмосферу от животноводческих комплексов и
звероферм.

13. Список использованных источников

1 Животноводство. [Электронный ресурс]. - Режим доступа http://ecoc.ru/products/method-animals (дата обращения 9.06.2016)
2 Несмелова, Н.Н. Методические указания по учебной (вычислительной)
практике. [Электронный ресурс]. – Режим доступа:
https://edu.tusur.ru/training/publications/2781 (дата обращения 09.06.2016)
3 Чернышев, А.А. Общие требования и правила оформления.
[Электронный ресурс]. - Режим доступа:
http://www.tusur.ru/export/sites/ru.tusur.new/ru/education/documents/inside
/tech_01-2013_new.pdf
(дата обращения 9.06.2016)

14. Спасибо за внимание