enddo
Write (6, *) 'При аварії в кінці лінії: '
Write (6, *) 'UU =', UU, 'В'
if (UU.gt.Udopa) then
Write (6, *) 'UU>', Udopa
endif
* Уточнення потужності в кільцевої мережі
Write (6, *) 'уточненням розрахунок потужності кільцевої мережі '
Write (6, *) ''
Do i = 2, n +1
Pkon (i) = Pp (i)
Qkon (i) = Qp (i)
enddo
Pn (0) = 0
Qn (0) = 0
Do i = 1, ia
ii ​​= ia +1- i
dP (ii) = (Pkon (ii) ** 2 + Qkon (ii) ** 2) * r0 * l (ii)/(Unom * Unom * 1000)
dQ (ii) = (Pkon (ii) ** 2 + Qkon (ii) ** 2) * x0 * l (ii)/(Unom * Unom * 1000) p> Pnach (ii) = dP (ii) + Pkon (ii)
Qnach (ii) = dQ (ii) + Qkon (ii)
Pkon (ii-1) = Pnach (ii) + Pn (ii-1)
Qkon (ii-1) = Qnach (ii) + Qn (ii-1)
enddo
Write (6, *) 'P джерела И1 дорівнює Pі1 = ', Pkon (0),' кВт '
Write (6, *) 'Q джерела И1 дорівнює Qі1 = ', Qkon (0),' кВАр '
do i = ia +1, n +1
dP (i) = (Pkon (i) ** 2 + Qkon (i) ** 2) * r0 * l (i)/(Unom * Unom * 1000)
dQ (i) = (Pkon (i) ** 2 + Qkon (i) ** 2) * x0 * l (i)/(Unom * Unom * 1000) p> Pnach (i) = dP (i) + Pkon (i)
Qnach (i) = dQ (i) + Qkon (i)
Pkon (i +1) = Pnach (i) + Pn (i)
Qkon (i +1) = Qnach (i) + Qn (i)
enddo
Write (6, *) ''
Write (6, *) 'P джерела И2 дорівнює Pі2 =', Pkon (5), 'кВт'
Write (6, *) 'Q джерела И2 дорівнює Qі2 = ', Qkon (5),' кВАр '
End
Дані для расчера:
3800 10 січня 1200
850 593.304 750 641.371 317.175 150.168
4 травня 4 травня
где3-число навантажень замкнутої мережі 10 кВ;
800-допустима втрата напруги в нормальному режимі, В;
10-номінальне напруга, кВ;
1-економічна щільність струму, А/мм2;
1200-допустима втрата напруги в аварійному режимі, В;
Під другому рядку наведені навантаження кільцевої мережі послідовно P, Q, l, причому останньої наведені навантаження трансформатора 10/0, 4 кВ.
У третьому рядку наведені відстані між навантаженнями, згідно варіанту завдання на курсовий проект.
Результати розрахунку:
Обьщяя довжина кільця А В З
dl = 18.000000 км
Р джерела живлення Pp (1) = 1076.993000 кВт
Q джерела живлення Qp (1) = 790.896200 кВАр
Pp (2) = 226.993000
Qp (2) = 197.592200
Pp (3) = -523.007000
Qp (3) = -443.778800
Pp (4) = -840.181900
Qp (4) = -593.946800
Точка Струмоподіл активних потужностей
ia = 2
Точка Струмоподіл реактивних потужностей
ir = 2
Токі на ділянках лінії
Car (1) = 77.145550 A
Car (2) = 17.375130 A
Car (3) = 39.601170 A
Car (4) = 59.404780 A
Еквівалентний струм дорівнює
Carl = 55.217960 A
Попередній розрахунок перетину кабелю
S = 55.217960 мм2
Втрати напруги на ділянках лінії
Ul (1) = 262.676300 B
Ul (2) = 45.044410 B
Ul (3) = 103.505000 B
Ul (4) = 204.215700 B
Втрата напруги до активної точки Струмоподіл
Ua = 307.720700 B
Втрата напруги до реактивної точки Струмоподіл
Ur = 307.720700 B
Вибрати провід перетином
S0 = 70.000000 мм2
При аварії на початку лінії:
UU = 945.634700 В
При аварії в кінці лінії:
UU = 735.176500 В
уточнений розрахунок потужності кільцевої мережі
В
P джерела И1 дорівнює Pі1 = 1118.230000 кВт
Q джерела И1 дорівнює Qі1 = 796.574300 кВАр
В
P джерела И2 дорівнює Pі2 = 872.310600 кВт
Q джерела И2 дорівнює Qі2 = 598.370800 кВАр
7. Розрахунок розімкнутої електричної мережі та вибір трансформатора 110/10 кВ
В
Мета розрахунку полягає в визначення на основі інформації про значення напруги, а також значеннях активної і реактивної потужностей
Рис.4. Схема Дволанцюговий лінії з трансформаторами по кінцях і схема її заміщення
в нагрузочном вузлі схеми мережі, напруг у вузлах і перетоків потужності на окремих ділянках мережі. p> підвищувальних і понижувальних трансформатори на схемі заміщення представлені активними і індуктивними опорами, а поперечна провідність трансформатора замінена постійної навантаженням (втратами активної і реактивної потужностей в сталі трансформатора, наближено рівними втрат холостого ходу).
Зробимо необхідні обчислення за наступною програмою, реалізованої на мові FORTRAN. У даній програмі проводиться вибір трансформатора згідно з додатком 7. [2]. Але для цього необхідно попередньо прорахувати повне навантаження трансформатора 110/10 кВ. Вибір трансформатора відбува...
