Реферат: Применение ЭВМ штабами ГО и ЧС для расчетов поражающих факторов ядерного взрыва
Что касается возможностей современных ЭВМ (причем речь идет не об отдельно стоящей машине, а о компьютере с возможностью как автономной работы, так и доступа к удаленным ресурсам), современный уровень технологии позволяет обеспечить практически любой уровень производительности и отказоустойчивости системы, который может потребоваться в рамках решаемой задачи, будь то примитивный документооборот или управление ограниченными ресурсами в боевых условиях в реальном времени при отсутствии источников энергии. В данном случае требования к производительности определяются двумя факторами: масштабом задач и ограниченностью ресурсов для их решения. Итак, определим задачи ГО вообще.
[sms]Задачи гражданской обороны.
Гражданская оборона - составная часть системы общегосударственных оборонных мероприятий, проводимых в мирное и военное время в целях защиты населения и народного хозяйства от оружия массового поражения и других современных средств нападения противника, а также для СИДНР в очагах поражения и зонах катастрофического затопления.
1. Защита населения от оружия массового поражения и других средств нападения противника осуществляется проведением комплекса защитных мероприятий, что позволяет максимально ослабить результаты воздействия оружия массового поражения, создать благоприятные условия для проживания и деятельности населения, работы объектов, и действий сил ГО при выполнении стоящих перед ними задач.
2. Повышение устойчивости работы объектов и отраслей экономики в условиях военного времени может быть достигнуто заблаговременным проведением организационных, инженерно-технических и других мероприятий, направленных на максимальное снижение результатов воздействия оружия массового поражения, создание благоприятных условий для быстрой ликвидации последствий нападения противника.
3. Проведение спасательных аварийно-восстановительных работ в очагах поражения и зонах затопления. Без успешного проведения таких работ невозможно наладить деятельность объектов, подвергшихся ударам противника, создать нормальные условия для жизнедеятельности населения пострадавших городов.
Основной расчет поражающих факторов ядерного взрыва
Данная программа, написанная на языке высокого уровня Pascal, позволяет рассчитать основные параметры поражающих факторов ядерного взрыва. Данные параметры необходимы при анализе и повышении устойчивости объектов производства, при планировании и организации спасательных и других неотложных работ.
Исходные данные:
1. Вид взрыва: а) воздушный, б) наземный;
2. Мощность взрыва;
3. Расстояние до ОЭ;
4. Раcстояние до района рассредоточения;
5. Коэффицент ослабления атмосферы;
6. Скорость ветра;
7. Угол между осью следа радиоактивного облака и линией, проведенной через ОЭ и эпицентр взрыа;
Выходные данные:
1. Избыточное давление во фронте ударной волны;
2. Импульс светового излучения;
3. Суммарная доза гамма-излучения;
4. Мощность дозы Г-излучения;
5. Поток нейтронов;
6. Вертикальная составляющая эл.поля ЭМИ;
7. Уровень радиации радиоактивного заражения;
Текст программы
program voina;
var
Pvzr,vid,rr,vv,bet:real;
R_onx,ko,dPf,qy,R,rs,U,Fn,Pg,Dz,Dosk,Dg,E,P0,alf:real;
begin
writeln('Введите вид взрыва,если взрыв воздушный -> нажми 1');
writeln(' если взрыв наземный -> нажми 2');
read(vid);
writeln('Введите мощность взрыва,Kт');
read(Pvzr);
writeln('Введите расстояние до ОЭ,км');
read(R_onx);
writeln('Введите раcстояние до района рассредоточения,км');
read(rr);
writeln('Введите коэфицент ослабления');
read(ko);
writeln('Введите скорость ветра,км/ч');
read(vv);
writeln('Введите угол,град');
read(bet);
qy:=0.5*Pvzr*1000000;
R:=R_onx*1000;
dPf:=105/R*exp(1/3*ln(qy))+410/R/R*exp(2/3*ln(qy))+1370/r/r/r*qy;
if vid=1 then
rs:=0.052*exp(0.4*ln(Pvzr))
else
rs:=0.068*exp(0.4*ln(Pvzr));
R:=R_onx;
U:=111*Pvzr/R/R*exp(-ko*(R-rs));
R:=R*1000;
Fn:=7.5*exp(22*ln(10))/R/R*Pvzr*exp(-R/190);
Pg:=exp(13*ln(10))/R/R*Pvzr*exp(-R/200);
Dz:=5*exp(8*ln(10))/R/R*Pvzr*exp(-R/410);
Dosk:=1.4*exp(9*ln(10))*Pvzr*(1+0.2*exp(0.65*ln(Pvzr)))/R/R*exp(-R/300);
Dg:=Dz+Dosk;
R:=R_onx;
alf:=Pi/4-2*bet*Pi/180;
E:=5*exp(3*ln(10))*(1+2*R)/R/R/R*ln(14.5*Pvzr)/ln(10);
P0:=10*Pvzr/(exp(1.5*ln(rr/22))*exp(sqrt(rr/vv)))*sqr(sqr(sin(alf)/cos(alf)));
writeln('Избыточное давление во фронте ударной волны: ',dPf:1:3,' кПа');
writeln('Импульс светового излучения: ',U:1:3,' кДж/м¤');
writeln('Суммарная доза гамма-излучения: ',Dg:1:3);
writeln('Мощность дозы Г-излучения: ',Pg:1:3);
writeln('Поток нейтронов: ',Fn:3,' н/м¤');
if vid=2 then
writeln('Вертикальная составляющая эл.поля ЭМИ: ',E:1:3,' В/м');
writeln('Уровень радиации радиоактивного заражения: ',P0:1:3);
writeln('');
end. [/sms]