Дипломная работа - Реконструкции участка зоновой сети Аулиеколь-Костанай на базе ВОЛС - файл n6.doc

Дипломная работа - Реконструкции участка зоновой сети Аулиеколь-Костанай на базе ВОЛС
скачать (389.2 kb.)
Доступные файлы (17):
n2.doc26kb.27.03.2009 08:47скачать
n3.doc38kb.23.03.2009 01:40скачать
n4.doc26kb.23.03.2009 05:13скачать
n5.doc85kb.27.03.2009 09:28скачать
n6.doc34kb.23.03.2009 04:41скачать
n7.doc38kb.23.03.2009 04:51скачать
n8.doc31kb.23.03.2009 05:08скачать
n9.doc102kb.27.03.2009 08:17скачать
n10.doc77kb.23.03.2009 04:11скачать
n11.doc47kb.23.03.2009 04:11скачать
n12.doc76kb.27.03.2009 08:34скачать
n13.doc48kb.22.03.2009 23:07скачать
n14.doc114kb.27.03.2009 09:31скачать
n15.doc606kb.27.03.2009 09:37скачать
n16.doc432kb.27.03.2009 08:09скачать
n17.doc62kb.27.03.2009 08:15скачать
n18.doc133kb.27.03.2009 09:43скачать

n6.doc

Приложение В
R e g e n e r a t i o n d i s t a n c e

Please input energy resource E_r, [dB] 50

Please input summary looses a_s, [db] 20

Please input looses on 1 km a, [db/km] 0.4

lru = 75.000 km

Программа расчета длины регенерационного участка



Program Regeneration_distance;

Var

E_r, a_s, a, lru:real;
begin

writeln; writeln;

writeln(' R e g e n e r a t i o n d i s t a n c e');

writeln;

writeln('Input parameters');

writeln;

Write('Please input energy resource E_r, [dB] ');

read(E_r);

write('Please input summary looses a_s, [db] ');

read(a_s);

write('Please input looses on 1 km a, [db/km] ');

read(a);

writeln;

lru:=(E_r-a_s)/a;

writeln('lru = ',lru:5:3,' km');

writeln('Press "Enter"'); readln;

end.



Алгоритм расчета длины регенерационного участка





Рисунок 1 – Алгоритм расчета длины регенерационного участка




Рисунок 1 – Алгоритм расчета длины регенерационного участка

Учебный материал
© nashaucheba.ru
При копировании укажите ссылку.
обратиться к администрации