Расчет напряженности поля в окрестностях ИОРТПЦ

end;

line(x1,y1,x2,y2);

line(x1,y1-1,x2,y2-1);

line(x1,y1-2,x2,y2-2);

delay(20);

end;

end;

{Графические процедуры}

procedure drawing1st; {Инициализирует графику, подготавливает экран}

begin

grinit;

setbkcolor(15);

cleardevice;

setcolor(darkgray);

rectangle(10,10,getmaxx-10,getmaxy-10);

drawgrid;

drawcoords;

end;

procedure drawing2nd; {Выводит график на экран}

begin

drawgrafic;

readln;

closegraph;

end;

begin

ClrScr;

{ Input;}p:=100; d:=8; hb:=127;

grinit;

repeat

cleardevice;

i:=2;

repeat

a:=ddt;

until a<>0;

Hmenu_choice:=a div 100;

Case Hmenu_choice of

1: begin

choice:=a mod 100;

if choice=2 then break else begin

input;

input_is:=true;

end;

end;

2: if not(input_is) then begin

gwritexy(17,10,'! Сначала необходимо ввести даннные !',5,1);

ch:=readkey;

continue;

{end else begin

choice:=a mod 100;

Drawing1st;

Ordinates;

E_Maximum;

ToFile;

Values;

Drawing2nd; }

end;

end;

until false;

HVMenu.Done;

cleardevice;

closegraph;

write(p:1:2,' ',d:1:2,' ',hb:1:2);

end.

Приложение 2 – таблица измерения напряженности поля вблизи Усольского ретранслятора.

Места проведения измерений

Расстояние

Направленная антенна

Круговая антенна

км

Е (видео), мкВ/м

Е (звук), мкВ/м

Е (видео), мкВ/м

Е (звук), мкВ/м

1.Тайтурка

11

178

112

316

200

2.Средний

11

280

126

708

354

3.Мальта

6

630

354

1412

708

4.Белореченск

7

707

446

1258

708

5.Тракт

2

4466

1995

25118

7080

6.Зеленый гор. ул.Энергетиков

4

17780

5010

2512

1412

7.Зеленый гор. ул.Фурманова

2,5

12590

4466

5012

1122

8.У- С. Горбольница

5,5

3980

1258

2238

1258

9.У-С. ул. Горького

6

3548

1122

1778

890

10. У- С. ул.Крупской

5

3548

1412

2623

1238

11. У- С. ж/д. переход

2,4

19952

7080

5623

2238

12. У- С. площадь

4

6310

1995

2512

1122

13. У- С. Комсомольский пр-т

5

2818

708

1778

890

14. У- С. мр-н Привокзальный

7

1995

708

708

400

15. У- С. Ленинский пр-т

8

1995

794

890

446

16. У- С. Восточ. окраина

9

2339

630

708

500

17. Тельма, Зап. окраина

15

890

354

446

224

Перейти на страницу: 1 2 3 4 5

Дополнительные материалы

Эфир структура и ядерные силы
В работе предложена эфирная концепция строения материи на основе теории эфира. Это позволило адекватно и логически непротиворечиво объяснить многие физические явления. ...

Фазовая, групповая и сверхсветовая скорости
Критически проанализированы понятия фазовой и групповой скоростей в дисперсной среде. На основании проведенного анализа был сделан вывод о неправомерности введения понятия “групповая скорость”. Также был сделан вывод, что модулирующий сигн ...

Специфика научной деятельности
Наука - это специфическая деятельность людей, главной целью которой является получение знаний о реальности. Знание - главный продукт научной деятельности, но не единственный. К продуктам науки можно отнести и научный стиль рационально ...

Разделы

Электромагнитный импульс как оружие

История вопроса и современное состояние знаний в области эми.

Лабораторные стенды в учебном процессе

Обзор и сравнительный анализ существующих стендов.

Аспекты технического знания

Технический объект и предмет технических наук.

Сварка металлов плавлением

Классификация электрической дуговой сварки.

Распределение примесей в кремнии

Описание процесса зонной плавки и ее математическая модель.



Наука сегодня и вчера - www.anytechnic.ru