Курсовая работа: Расчет распределительных сетей
d(4) = 450
d(5) = 250
d(6) = 300
d(7) = 300
d(8) = 300
d(9) = 150
l(1) = 1000
l(2) = 1150
l(3) = 750
l(4) = 600
l(5) = 650
l(6) = 1000
l(7) = 1300
l(8) = 650
l(9) = 300
q(1) = .185
q(2) = .080
q(3) = .020
q(4) = .185
q(5) = .065
q(6) = .115
q(7) = .075
q(8) = .08
q(9) = .02
FOR i = 1 TO n
s(i) = .001735 * 1.1 * l(i) / ((d(i) / 1000) ^ 5.3)
NEXT i
10
dh1 = s(1) * q(1) * ABS(q(1)) - s(3) * q(3) * ABS(q(3)) - s(2) * q(2) * ABS(q(2))