Оценка величины предотвращенного ущерба от загрязнения водной среды

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

3.1.1. Оценка величины предотвращенного ущерба от загрязнения водной среды проводится на основе региональных показателей удельного ущерба, представляющих собой удельные стоимост-ные оценки ущерба на единицу (1 условную тонну) приведенной массы загрязняющих веществ.
Расчетные формулы имеют следующий вид:

Увпрг = ∑Увудrj * ∆Mrв * Kэв* JД
(1)
где
ΔМrв=М1в-М2в (2)
Увпрг - эколого-экономическая оценка величины предотвращенного ущерба водным ресурсам в рассматриваемом r-том регионе, (далее - предотвращенный ущерб), тыс. руб./год;
Увудrj - показатель удельного ущерба (цены загрязнения) водным ресурсам, наносимого едини-цей (условная тонна) приведенной массы загрязняющих веществ на конец расчетного периода для j-го водного объекта в рассматриваемом r-том регионе, руб./усл. тонну, \ принимается по таблице 1 Приложения 1;
М1в, М2в - приведенная масса сброса загрязняющих веществ в водные объекты рассматриваемо-го региона, соответственно, на начало и конец расчетного периода, тыс.уcл.тонн; опре-деляется согласно п. 3.1.2.
ΔМrв - приведенная масса загрязняющих веществ, снимаемых (ликвидируемых) в результате природоохранной деятельности и осуществления соответствующих водоохранных меро-приятий в r-том регионе в течение расчетного периода, тыс.уcл.тонн/год.
Кэв - коэффициент экологической ситуации и экологической значимости состояния водных объектов по бассейнам основных рек, определяется в соответствии с /З/.
JД - индекс-дефлятор по отраслям промышленности, устанавливаемый Минэкономикой России на рассматриваемый период и доводимый Госкомэкологии России до территориальных природоохранных органов.
3.1.2. Приведенная масса загрязняющих веществ рассчитывается по следующей формуле:
- для к-го конкретного объекта или направления водоохранной деятельности в регионе:
Mвк = ∑mвj * kвп (3)
- для r-го региона (района) в целом:
Mвк = ∑mвj(4)
где: miв - масса фактического сброса i-гo загрязняющего вещества или группы веществ с одинако-вым коэффициентом относительной эколого-экономической опасности в водные объек-ты рассматриваемого региона, т/год;
Квэi - коэффициент относительной эколого-экономической опасности для i-го загрязняющего вещества или группы веществ (таблица 2 Приложения 1).
i - номер загрязняющего вещества или группы веществ (таблица 2 Приложения 1).
N - количество учитываемых загрязняющих веществ.
3.1.2.1 В качестве основы для расчетов приведенной массы загрязнений используются утвер-жденные значения предельно - допустимых концентраций (ПДК) загрязняющих веществ в воде водоемов рыбохозяйственного значения (как наиболее жесткие) С помощью ПДК определяются коэффициенты эколого-экономической опасности загрязняющих веществ (как величина обратная ПДК: Кэi,=1/ПДК).
3.1.2.2. Показатель m определяется на основе данных статистической отчетности предприятий и организаций (форма 2ТП - “Водхоз”), данных гидрохимических лабораторий, аттестованных на право проведения соответствующих анализов, материалов контрольных служб территориальных природоохранных органов и гидрометеорологии, данных проектных материалов и др.
3.1.2.3. Учитывая огромное количество наименований поступающих в водные источники за-грязняющих веществ, при расчете коэффициентов относительной эколого -экономической опас-ности загрязнения группируются по классам опасности и признаку близких значений ПДКрх.
Коэффициенты относительной эколого-экономической опасности для 14 групп загрязняющих веществ приведены в таблице 2 Приложения 1.




Вот эту задачу я не могу оформить в бэйсике, чтобы была табличка в exel-е, помогите хотя бы ввести эти данные, с нужными операторами, циферки можно любые вставить, я сам потом разберусь и подставлю что нужно, заранее спасибо, в долгу не останусь!)))))))

0

Сообщение от Zmei_Omsk оформить в бэйсике, чтобы была табличка в exel-е

так вам в VB или в VBA (в екселе который)?

0

Спасибо за отклик!) Я вроде как решил!) Я захожу в ексель, нажимаю алт+ф11 и там ввожу данные!)

0