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

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

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

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

Введение в физику скачков
Тема качественных изменений остается едва ли не самой острой в начале XXI века. Посреди плавного и спокойного течения жизни мы оказываемся вдруг невольными свидетелями, участниками, а иногда - и жертвами внезапных и резких изменений в окру ...

Оптика Гамильтона — Якоби
Когда в 1830 г. ирландец Уильям Роуан Гамильтон (1805—1865) начал заниматься оптикой, волновая теория света еще не была общепринятой. Пуассон был еще последователем корпускулярной теории. Био, самый консервативный из великих физиков XIX ве ...

Разделы

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

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

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

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

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

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

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

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

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

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



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