Расчет потерь электроэнергии в сетях

Аннотация Целью данной курсовой работы является разработка алгоритма, написание и отладка программы для решения электротехнической задачи на алгоритмическом языке. Данная программа позволит рассчитать суммарные потери электроэнергии и напряжения.

1.

Введение

и постановка задачи

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

Цель курсовой работы: закрепление практических навыков программирования на алгоритмических языках высокого уровня (в данной работе C++) на примере составления и отладки программы для решения электротехнической задачи, ознакомление со специальной терминологией, приобретение навыков написания и оформления программ.

Задача курсовой работы: разработка и проверка алгоритма, а также разработка блок-схемы, написание и отладка программы для определения суммарных потерь электроэнергии? W_c и активной мощности? P в схеме разомкнутой электрической сети по известным аналитическим соотношениям.

Электрические сети предназначены для питания потребителей электрической энергией. Часть электроэнергии при ее передаче по сетям теряется на нагрев проводов линии? W_л, обмоток? W_т и сердечников? W_хх трансформаторов. Очень важно рационально использовать электрическую энергию, а для этого необходимо точно рассчитать потери при ее передаче по электрическим сетям и минимизировать их. Поэтому задача этой курсовой работы является одной из важнейших задач в энергетике.

Для того чтобы реализовать задачу работы, необходимо изучить аналитические соотношения для расчета потерь электроэнергии в сетях, ввести исходные данные, разработать алгоритм и блок-схему программы, написать текст программы и получить результаты расчета.

2. Основные аналитические соотношения

Электрические схемы предназначены для питания потребителей электрической энергией. Часть электроэнергии при ее передаче по сетям теряется на нагрев проводов линии, обмоток и сердечника трансформаторов.

В схеме простейшей разомкнутой электрической сети суммарные потери электроэнергии складываются из трех составляющих и вычисляются по формуле:

(2.1)

где — суммарные потери электроэнергии на линейных участках схемы, ;

— суммарные потери электроэнергии в трансформаторах схемы, ;

— потери электроэнергии в стали трансформаторов, .

Потери электроэнергии на линейных участках определяются по формуле:

(2.2)

где — поток активной энергии на i-м линейном участке схемы, ;

— коэффициент реактивной мощности, о.е.;

— номинальное напряжение сети, ;

— расчетный период (месяц, квартал, год), ч;

— коэффициент формы графика нагрузки, о.е.;

— активное сопротивление i-го участка линии, Ом.

Величина равна отношению к :

(2.3)

где — поток реактивной электроэнергии на i-м линейном участке схемы, ;

— поток активной электроэнергии на участке, .

Значение, и определяются в процессе расчета потокораспределения в схеме.

Квадрат коэффициента формы вычисляется по формуле:

(2.4)

где — коэффициент заполнения графика, равный относительному числу часов использования максимальной активной нагрузки :

(2.5)

Значение определяется по выражениям:

(2.6)

где — общее число участков сети, подключенных к узлу i;

— активная мощность участка, подключенного к узлу i;

— число часов использования максимальной активной нагрузки участка k;

(2.7)

Активное сопротивление участка равно:

(2.8)

где — удельное активное сопротивление участка, Ом/км (справочные данные);

— длина участка в километрах (указана на схеме сети).

Нагрузочные потери электроэнергии на трансформаторных участках схемы определяются аналогичным образом:

(2.9)

где m — число трансформаторных участков в схеме;

— активное сопротивление трансформатора j, Ом,

(2.10)

— потери мощности короткого замыкания трансформатора j, (справочные данные);

— номинальное напряжение высшей обмотки трансформатора j, (принимается равным номинальному напряжению сети);

— номинальная мощность трансформатора j, (указана на схеме).

Постоянные потери электроэнергии в стали трансформаторов равны:

(2.11)

где (2.12)

— потери холостого хода трансформатора j, (справочные данные).

Все искомые величины, ,, и сумма (+) должны быть рассчитаны в именованных единицах () и в процентах по отношению к потоку электроэнергии на головном участке линии :

(2.13)

где (2.14)

Кроме потерь необходимо определить потери активной мощности :

(2.15)

(2.16)

(2.17)

(2.18)

в (2.19)

и в процентах по отношению к потоку активной мощности на головном участке схемы

(2.20)

(2.21)

(2.22)

(2.23)

(2.24)

Поток мощности на головном участке линии равен сумме нагрузок всех узлов и суммарных потерь активной мощности в схеме:

(2.25)

Аналогичным образом определяются потери реактивной мощности :

(2.26)

(2.27)

(2.28)

(2.29)

где — ток холостого хода трансформатора j, % (справочные данные), в и в процентах

(2.30)

(2.31)

(2.32)

(2.33)

(2.34)

(2.35)

Значение потока мощности на головном участке линии равно сумме нагрузок всех узлов и суммарных потерь реактивной мощности в схеме.

(2.36)

где — реактивное сопротивление i-го линейного участка схемы, Ом;

удельное реактивное сопротивление, Ом/км (справочные данные), а

(2.37)

где — реактивное сопротивление трансформатора j, Ом;

— модуль полного сопротивления трансформатора j, Ом,

(2.38)

где — напряжение короткого замыкания трансформатора j, % (справочные данные).

Для каждого участка схемы (линейного и трансформаторного) требуется определить потери напряжения, :

(2.39)

где, , и — потоки мощности (,) и сопротивления (,) как для линейных (,, ,), так и для трансформаторных (,, ,) участков схемы.

(2.40)

где — заданное напряжение источника питания (первый узел схемы);

— суммарные потери напряжения на пути от источника питания до узла j схемы.

Первый узел служит источником питания для всей схемы сети. Значение принимаем равным (1,03…1,15) .

После данного расчета напряжения за трансформаторами приводятся к стороне низшего напряжения по формуле:

(2.41)

где

Анализ схемы разомкнутой электрических сетей и приведенных выше основных расчетных соотношений показывает, что для их реализации необходимы режимные данные.

К режимным данным относятся:

— напряжение источника питания;

— коэффициент нагрузки трансформатора j, о.е. Он выбирается для каждого трансформатора из ряда: 0,1; 0,15; 0,2; 0,25; 0,3; 0,35; 0,4; 0,45; 0,5; 0,55; 0,6; 0,65; 0,7; 0,75; 0,8; 0,85; 0,9; 1,0; 1,05; 1,1; 1,15; 1,2; 1,25; 1,3; 1,35; 1,4; 1,5; 1,55; 1,6; 1,65; 1,7;

— коэффициент мощности трансформаторов. Выбирается из табл. П2 в зависимости от заданного типа нагрузки трансформаторного пункта: производственная, коммунально-бытовая, смешанная;

— число часов использования максимальной активной нагрузки трансформатора j, ч. Выбирается из табл. П1 в зависимости от расчетной нагрузки подстанции и типа нагрузки.

На основе введенной исходной информации можно определить основные режимные характеристики трансформаторов:

(2.42)

где — полная нагрузка j-го трансформатора в ;

(2.43)

(2.44)

(2.45)

(2.46)

(2.47)

.

3. Проверка работоспособности алгоритма вручную

Проверка потокораспределения

Схема 3 _ 1

Напряжение

Схема 3₂

Суммарные потери электроэнергии:

Таблица 3₁

4. Блок-схема. Алгоритм решения задачи

Схема 4₁

Алгоритм потокораспределения

Схема 4₂

где POT — поток мощности (энергии);

AOмассив адресных отображений;

TRAN — выход на трансформатор;

k — рабочая переменная.

Алгоритм расчета напряжений в узлах Схема 4₃

где SOURNn[i] - номер начала участка;

Unode — напряжение в узле;

Uict — напряжение головного участка;

dU — потери напряжения в узле;

k, к — рабочие переменные.

5. Идентификация переменных

Переменные в программе

Таблица 5₁

Файлы Таблица 5 _ 2

6. Разработка форм и структур представления исходных данных и результатов расчета

Исходные данные параметров сети и ее элементов вводятся в программу из двух таблиц:

Таблица 6−1

———————————————————————————————————————

| РЛ № 24, 10.0 кВ |

———————————————————————————————————————

|№ п/п| Nn | Nk | Марка | Li, |Тип транс- | Kz, | Tma, | cos |

| | | | провода | км |форматора | o.e.| ч | o.e. |

———————————————————————————————————————

| 1 | 1 | 2 | AC-50 | 0.080 | | | | |

| 2 | 2 | 101 | | | TM-30 | 0.60 | 1700 | 0.80 |

| 3 | 2 | 3 | AC-50 | 5.360 | | | | |

| 4 | 3 | 102 | | | TM-160 | 0.80 | 2500 | 0.70 |

| 5 | 3 | 4 | AC-50 | 0.400 | | | | |

Таблица 6−2

———————————————————————————————;

| Код задачи | РЛ № 24, 10.0 кВ |

———————————————————————————————;

| Расчетный период, ч | 8760 |

———————————————————————————————;

| Номинальное напряжение, кВ | 10.0 |

———————————————————————————————

Каталоги трансформаторов и линий, которые необходимы для работы программы, выглядят следующим образом:

Трехфазные двухобмоточные трансформаторы 6 и 10 кВ

Таблица 6−3

————————————————————————————————————;

| | Мощ- | Uном, кВ, | | | | |

| Тип транс- | ность | обмоток |Uкз,% | Pкз, кВт |Iхх, % | Pхх, |

| форматора | Sном, |———————-| | | | кВт |

| | кВА | ВН | НН | | | | |

————————————————————————————————————;

| 1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 |

————————————————————————————————————;

| ТМ-10 | 10 | 6.30 | 0.40 | 5.50 | 0.335 | 10.00 | 0.105 |

| ТМ-50 | 50 | 6.30 | 0.40 | 5.50 | 1.330 | 7.00 | 0.350 |

| ТМ-75 | 75 | 6.30 | 0.40 | 5.50 | 1.400 | 7.50 | 0.290 |

| ТМ-100 | 100 | 6.30 | 0.40 | 4.50 | 1.970 | 2.60 | 0.310 |

| | | | | | | | |

Усредненные расчетные данные воздушных линий и кабелей

Таблица 6−4

——————————————————————————————————————;

| Марка | Номинальное | Удельное | Удельное | Допустимый | Емкостный |

| провода | напряжение | активное | реактивное | ток | ток |

| (кабеля) | Uном, кВ | сопротив- | сопротив- | Iдоп, А | Iс, А |

| | | ление | ление | | |

| | | Rо, Ом/км | Xо, Ом/км | | |

——————————————————————————————————————;

| 1 | 2 | 3 | 4 | 5 | 6 |

——————————————————————————————————————;

| М-6 | 10.50 | 3.060 | 0.397 | 70 | 0.000 |

| М-10 | 10.50 | 1.790 | 0.381 | 95 | 0.000 |

| М-16 | 10.50 | 1.130 | 0.358 | 110 | 0.000 |

| М-25 | 10.50 | 0.720 | 0.345 | 180 | 0.000 |

| | | | | | |

Результаты расчетов представим следующим образом:

Напряжение в узлах схемы

Таблица 6−5

—————————————————————————;

| N n/n| Nn | Nk | Потери | Напряжение |

| | | | напряжения, кВ | узлов, кВ |

—————————————————————————;

| 1 | 1 | 2 | 0.006 | 10.994 |

| 2 | 2 | 101 | 0.306 | 0.428 |

Потери электроэнергии

Таблица 6−6

———————————————————————————————————————————

|Отпуск | Постоянные | Переменные (нагрузочные) | |

|энергии |(холостого хода)|——————————————————————| суммарные |

|в сеть | |в трансформаторах| в линии | суммарные | |

|тыс.кВт*ч|—————————————————————————————————————;

| | тыс. кВт*ч | % |тыс.кВт*ч | % |тыс.кВт*ч| % |тыс.кВт*ч| %|тыс.кВт*ч| %|

———————————————————————————————————————————

| | | | | | | | | | | |

———————————————————————————————————————————

Потокораспределение

Таблица 6−7

———————————————————————————————————————;

| | | | Поток мощности ветви | Поток энергии ветви |

| N n/n| Nn | Nk |————————————-|———————————————-|

| | | | активный | реактивный | активный | реактивный |

| | | | кВт | кВАр | кВт*ч | кВАр*ч |

———————————————————————————————————————;

| 1 | 1 | 2 | 906.37 | 673.27 | 2 412 540.00 | 1 801 700.87 |

| 2 | 2 | 101 | 14.40 | 10.80 | 24 480.00 | 18 360.00 |

| 3 | 2 | 3 | 891.97 | 662.47 | 2 388 060.00 | 1 783 340.87 |

Потери мощности

Таблица 6−8

————————————————————————————————————

| | | | Переменные | Постоянные (хол. хода) |

| N n/n| Nn | Nk |—————————————————————————

| | | | активной | реактивной | активной | реактивной |

| | | |—————-|——————|—————-|——————|

| | | | кВт | кВАр | кВт | кВАр |

———————————————————————————————————-|

| 1 | 1 | 2 | 0.615 | 0.362 | | |

| 2 | 2 | 101 | 0.306 | 0.509 | 0.300 | 2.700 |

| 3 | 2 | 3 | 39.899 | 23.490 | | |

И потери мощности в процентах:

Таблица 6−9

——————————————————————————————————;

| | активной | реактивной |

——————————————————————————————————;

| | % | % |

——————————————————————————————————;

| Суммарные потери мощности в сети: | | |

——————————————————————————————————;

| Суммарные потери мощности в линиях: | | |

——————————————————————————————————;

| Суммарные потери мощности в линиях и | | |

| трансформаторах: | | |

——————————————————————————————————;

| Суммарные потери мощности в | | |

| трансформаторах: | | |

——————————————————————————————————;

| Суммарные потери мощности | | |

| холостого хода: | | |

——————————————————————————————————;

7. Написание и отладка программы

Ш Ввод и печать исходной информации.

Схема исследуемой сети:

Схема 7₁

Ввод схемы в программу будет осуществляться из следующих двух таблиц:

Таблица 7−1

——————————————————————————————————————-;

| РЛ № 24, 10.0 кВ |

——————————————————————————————————————-;

|№ п/п| Nn | Nk | Марка | Li, |Тип транс- | Kz, | Tma, | cos |

| | | | провода | км |форматора | o.e.| ч | o.e. |

——————————————————————————————————————-;

| 1 | 1 | 2 | AC-50 | 0.080 | | | | |

| 2 | 2 | 101 | | | TM-30 | 0.60 | 1700 | 0.80 |

| 3 | 2 | 3 | AC-50 | 5.360 | | | | |

| 4 | 3 | 102 | | | TM-160 | 0.80 | 2500 | 0.70 |

| 5 | 3 | 4 | AC-50 | 0.400 | | | | |

| 6 | 4 | 5 | AC-50 | 0.480 | | | | |

| 7 | 4 | 6 | AC-50 | 0.100 | | | | |

| 8 | 5 | 103 | | | TM-160 | 0.35 | 2000 | 0.90 |

| 9 | 6 | 104 | | | TM-180 | 0.40 | 2800 | 0.80 |

| 10 | 6 | 7 | AC-70 | 0.100 | | | | |

| 11 | 7 | 8 | AC-70 | 0.100 | | | | |

| 12 | 8 | 105 | | | TM-160 | 0.50 | 2800 | 0.80 |

| 13 | 7 | 9 | AC-70 | 1.440 | | | | |

| 14 | 9 | 10 | A-35 | 0.400 | | | | |

| 15 | 10 | 106 | | | TM-160 | 0.25 | 2200 | 0.80 |

| 16 | 9 | 11 | AC-70 | 1.120 | | | | |

| 17 | 11 | 107 | | | TM-160 | 0.70 | 2350 | 0.90 |

| 18 | 11 | 12 | AH-50 | 0.900 | | | | |

| 19 | 12 | 108 | | | TM-200 | 0.20 | 2000 | 0.70 |

| 20 | 12 | 13 | AC-50 | 0.160 | | | | |

| 21 | 13 | 109 | | | TM-100 | 0.90 | 2800 | 0.80 |

| 22 | 11 | 14 | AH-50 | 0.500 | | | | |

| 23 | 14 | 110 | | | TM-400 | 0.40 | 3200 | 0.80 |

| 24 | 14 | 15 | AH-50 | 0.240 | | | | |

| 25 | 15 | 16 | AH-50 | 0.560 | | | | |

| 26 | 16 | 111 | | | TM-400 | 0.55 | 3200 | 0.80 |

| 27 | 15 | 17 | AH-50 | 0.320 | | | | |

| 28 | 17 | 18 | AH-50 | 0.480 | | | | |

| 29 | 18 | 112 | | | TM-63 | 0.70 | 2000 | 0.70 |

| 30 | 17 | 19 | AH-50 | 6.680 | | | | |

| 31 | 19 | 20 | A-35 | 3.360 | | | | |

| 32 | 20 | 113 | | | TM-30 | 0.90 | 1600 | 0.90 |

| 33 | 19 | 21 | A-35 | 0.880 | | | | |

| 34 | 21 | 114 | | | TM-160 | 0.30 | 2200 | 0.80 |

———————————————————————————————————————;

Таблица 7−2

———————————————————————————————;

| Код задачи | РЛ № 24, 10.0 кВ |

———————————————————————————————;

| Расчетный период, ч | 8760 |

———————————————————————————————;

| Номинальное напряжение, кВ | 10.0 |

———————————————————————————————;

Каталоги трансформаторов и линий выглядят следующим образом:

Таблица 7−3

————————————————————————————————————;

| | Мощ- | Uном, кВ, | | | | |

| Тип транс- | ность | обмоток |Uкз,% | Pкз, кВт |Iхх, % | Pхх, |

| форматора | Sном, |———————-| | | | кВт |

| | кВА | ВН | НН | | | | |

————————————————————————————————————;

| 1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 |

————————————————————————————————————;

| ТМ-100 | 100 | 10.50 | 0.40 | 5.50 | 2.400 | 6.50 | 0.730 |

| ТМ-400 | 400 | 10.50 | 0.40 | 4.50 | 5.500 | 5.50 | 1.100 |

| ТМ-560 | 560 | 10.50 | 0.40 | 5.50 | 9.400 | 6.00 | 2.500 |

| ТМ-630 | 630 | 10.50 | 0.40 | 5.50 | 7.600 | 2.00 | 1.310 |

Таблица 7−4

——————————————————————————————————————;

| Марка | Номинальное | Удельное | Удельное | Допустимый | Емкостный |

| провода | напряжение | активное | реактивное | ток | ток |

| (кабеля) | Uном, кВ | сопротив- | сопротив- | Iдоп, А | Iс, А |

| | | ление | ление | | |

| | | Rо, Ом/км | Xо, Ом/км | | |

——————————————————————————————————————;

| 1 | 2 | 3 | 4 | 5 | 6 |

——————————————————————————————————————;

| ААБ-150 | 10.50 | 0.206 | 0.079 | 275 | 0.000 |

| АСБ-95 | 10.50 | 0.310 | 0.083 | 265 | 1.000 |

| АСБ-150 | 10.50 | 0.196 | 0.079 | 355 | 1.300 |

| АСБ-240 | 10.50 | 0.122 | 0.075 | 460 | 1.600 |

| ААШВУ-150 | 10.50 | 0.206 | 0.079 | 275 | 0.000 |

| АСБ-95 | 6.30 | 0.340 | 0.083 | 210 | 1.000 |

Ш Диагностика.

Диагностика и исправление ошибок в программе заключается в следующем:

· Проверка и исправление пунктов нумерации введенных данных;

· Правильное месторасположение марок линий и трансформаторов в таблице;

· Проверка на наличие введенных марок линий и трансформаторов в каталогах, при их отсутствии — программное добавление их в каталог;

· Проверка введения длинны линии;

· Проверка правильности выбранных коэффициентов загрузок трансформаторов;

· Проверка правильности введения часов использования максимальной нагрузки;

· Проверка правильности выбранных коэффициентов мощности трансформаторов.

Ш Программная реализация основных аналитических положений.

Код программы

#include

#include

#include

#include

void main ()

{

FILE* TR;

if ((TR=fopen («TRANSFORMER_DOS.TXT», «r+»))==NULL)

{printf («Не удается открыть файл.»);}

FILE* LIN;

if ((LIN=fopen («LINE_DOS.TXT», «r+»))==NULL)

{printf («Не удается открыть файл.»);}

FILE* SOUR;

if ((SOUR=fopen («SOURCE_DOS.TXT», «rt»))==NULL)

{printf («Не удается открыть файл.»);}

FILE* CHN;

if ((CHN=fopen («Info_CHAIN_DOS.TXT», «rt»))==NULL)

{printf («Не удается открыть файл.»);}

FILE* POT;

if ((POT=fopen («Result_POT.txt», «wt»))==NULL)

{printf («Не удается создать файл для записи.»);}

FILE* POW;

if ((POW=fopen («Losses_powers.txt», «wt»))==NULL)

{printf («Не удается создать файл для записи.»);}

FILE* ENE;

if ((ENE=fopen («Losses_energy.txt», «wt»))==NULL)

{printf («Не удается создать файл для записи.»);}

FILE* Vol;

if ((Vol=fopen («Voltage_node.txt», «wt»))==NULL)

{printf («Не удается создать файл для записи.»);}

char T[900], KOD[200], TRM[500][50], K[900], L[900], LNM[500][50], SOURML[300][30], SOURMTR[300][30];

double TRSnom[500], TRUnomvn[500], TRUnomnn[500], TRUkz[500], TRPkz[500], TRIxx[500], TRPxx[500], TRRtr[500], TRXtr[500], TRQxx[500];

double LNUnom[500], LNRo[500], LNXo[500], LNIdop[500], LNIc[500], SOURTma[500], CHNUnom;

double POTP[300], POTQ[300], POTWp[300], POTWq[300];

int AO[300], SOURP[300], SOURNn[500], SOURNk[500], PERIOD ;

double SOURKz[500], SOURCOS[500], SOURDLINA[500];

char OglTr[900], OglLn[900], SOURML1[300][30], SOURMTR1[300][30];

int i, tr, ent, lin, t, TRAN[300], k, r, t1, t2, t3;

char line[12] = ««;

double Pl[300], dPl, Pt[300], dPt, Pxx[300], dPxx, dPlt, dP, Pgy, Ql[300], dQl, Qt[300], dQt, Qxx[300], dQxx, dQlt, dQ, Qgy;

double Wt[300], Wl[300], Wxx[300], Kfl2[300], Kft2[300], Tma[300], Wgy, dWt, dWl, dWlt, dW, dWxx;

char L1[300][30], L2[300][30], L3[300][30], T1[300][30], T2[300][30], T3[300][30];

double dU[300], Uict, Unode[300];

fscanf (SOUR, «%474c» ,&T); // Файл SOURCE_DOS.TXT

for (i=1; i<50;i++)

{fscanf (SOUR, «%23c%11c%10c%11c%24c», &T,&SOURML1[i],&T,&SOURMTR1[i],&T);} rewind (SOUR);

fscanf (SOUR, «%158c%316c» ,&KOD, &K);

i=1;

do

{ TRAN[i]=strcmp (SOURML1[i], line);

if (TRAN[i]≠0){fscanf (SOUR, «%1c%4d%3c%3d%6c%3d%3c%11c%2c%6lf%37c» ,&T, &SOURP[i], &T, &SOURNn[i], &T, &SOURNk[i], &T, &SOURML[i], &T,&SOURDLINA[i], &T);}

else {fscanf (SOUR, «%1c%4d%3c%3d%6c%3d%24c%11c%2c%4lf%3c%5lf%3c%4lf%3c» ,&T, &SOURP[i], &T, &SOURNn[i], &T, &SOURNk[i], &T,

&SOURMTR[i], &T, &SOURKz[i], &T, &SOURTma[i], &T, &SOURCOS[i], &T);} i++; ent=i-1;} while (SOURP[i-1]≠0);

fscanf (CHN, «%227c%6d%122c%7lf «,&T, &PERIOD, &T, &CHNUnom); // Файл Info_CHAIN_DOS.TXT

M5:

rewind (LIN);

fscanf (LIN, «%858c», &OglLn); // Файл LINE_DOS.TXT

i=1;

do

{fscanf (LIN, «%1c%11c%4c%6lf%7c%6lf%7c%6lf%9c%3lf%9c%5lf%4c» ,&T, &LNM[i], &T, &LNUnom[i], &T, &LNRo[i], &T, &LNXo[i],&T, &LNIdop[i], &T, &LNIc[i], &T);

i++; lin=i-1;} while (LNUnom[i-1]≠0);

M4:

rewind (TR);

fscanf (TR, «%740c», &OglTr); // Файл TRANSFORMER_DOS.TXT

i=1;

do

{fscanf (TR, «%1c%11c%3c%5lf%3c%5lf%3c%5lf%2c%5lf%4c%6lf%3c%5lf%3c%6lf%3c», &T, &TRM[i], &T, &TRSnom[i], &T, &TRUnomvn[i], &T, &TRUnomnn[i],

&T, &TRUkz[i], &T, &TRPkz[i], &T, &TRIxx[i], &T, &TRPxx[i], &T); i++; tr=i-1;} while (TRSnom[i-1]≠0);

clrscr ();

printf («nnnnn Расчет потерь в разомкнутой сетиnnn»);

printf («Для начала расчета нажмите любую клавишу n»);

getch ();

for (int i=1; i

strncpy (L1[i], SOURML[i], 1); strncpy (L2[i], SOURML[i], 2); strncpy (L3[i], SOURML[i], 3);

strncpy (T1[i], SOURMTR[i], 1); strncpy (T2[i], SOURMTR[i], 2); strncpy (T3[i], SOURMTR[i], 3);}

for (i=1; i

{if (TRAN[i]≠0) { t1=strcmp (L1[i]," «);t2=strcmp (L2[i],» «);t3=strcmp (L3[i],» «);

if (t1≠0) { printf («Извините, данные введены не верно. Марку линии под пунктом %2d (узел%3d) необходимо сдвинуть вправо на один символ. nn», SOURP[i], SOURNk[i]);

printf («nИсправте и запустите программу сноваn»); goto M7 ;}

if ((t2==0) && (t3≠0)) { printf («Извините, данные введены не верно. Марку линии под пунктом %2d (узел%3d) необходимо сдвинуть влево на один символ. nn», SOURP[i], SOURNk[i]);

printf («nИсправте и запустите программу сноваn»); goto M7 ;}

if (t3==0) { printf («Извините, данные введены не верно. Марку линии под пунктом %2d (узел%3d) необходимо сдвинуть влево на два символа. nn», SOURP[i], SOURNk[i]);

printf («nИсправте и запустите программу сноваn»); goto M7 ;}

}}

for (i=k; k

{if (TRAN[i]==0) { t1=strcmp (T1[k]," «);t2=strcmp (T2[k],» «);t3=strcmp (T3[k],» «);

if (t1≠0) { printf («Извините, данные введены не верно. Марку трансформатора под пунктом %2d (узел %3d) необходимо сдвинуть вправо на один символ. nn», SOURP[k], SOURNk[k]);

printf («nИсправте и запустите программу сноваn»); goto M7 ;}

if ((t2==0) && (t3≠0)) {printf («Извините, данные введены не верно. Марку трансформатора под пунктом %2d (узел %3d) необходимо сдвинуть влево на один символ. nn», SOURP[k], SOURNk[k]);

printf («nИсправте и запустите программу сноваn»); goto M7 ;}

if (t3==0) { printf («Извините, данные введены не верно. Марку трансформатора под пунктом %2d (узел %3d) необходимо сдвинуть влево на два символа. nn», SOURP[k], SOURNk[k]);

printf («nИсправте и запустите программу сноваn»); goto M7 ;}

}}

for (i=1; i

{for (r=1; r

else

if (r==ent+1){printf («просто12 3456n»); }} M9: }

for (i=1; i

{if (TRAN[i]==0) {if ((SOURTma[i]==0) || (SOURTma[i]<1200) || (SOURTma[i]>3400)){SOURTma[i]=2600;

printf («Извените, число часов использования максимума для узла %3d (N пункта %3d) задан не верно. Принято значение 2600 ч. n», SOURNk[i], SOURP[i]);}}}

for (i=1; i

{if (TRAN[i]==0) {if (((SOURKz[i]≠0.1) && (SOURKz[i]≠0.15) && (SOURKz[i]≠0.2) && (SOURKz[i]≠0.25) && (SOURKz[i]≠0.3) && (SOURKz[i]≠0.35) &&

(SOURKz[i]≠0.40) && (SOURKz[i]≠0.45) && (SOURKz[i]≠0.50) && (SOURKz[i]≠0.55) && (SOURKz[i]≠0.60) && (SOURKz[i]≠0.65) &&

(SOURKz[i]≠0.70) && (SOURKz[i]≠0.75) && (SOURKz[i]≠0.80) && (SOURKz[i]≠0.85) && (SOURKz[i]≠0.90) && (SOURKz[i]≠1.0) &&

(SOURKz[i]≠1.05) && (SOURKz[i]≠1.1) && (SOURKz[i]≠1.15) && (SOURKz[i]≠1.2) && (SOURKz[i]≠1.25) && (SOURKz[i]≠1.3) && (SOURKz[i]≠1.35) && (SOURKz[i]≠1.40) && (SOURKz[i]≠1.45) && (SOURKz[i]≠1.50) && (SOURKz[i]≠1.55) && (SOURKz[i]≠1.60) &&

(SOURKz[i]≠1.65) && (SOURKz[i]≠1.70))) { SOURKz[i]=1.1;

printf («Извените, коэффициент загрузки трансформатора узла %3d (N пункта %3d) задан не верно. Принято значение 1.1 n», SOURNk[i], SOURP[i]);}}}

for (i=1; i

{if (TRAN[i]==0) {if ((SOURCOS[i]≠0.7) && (SOURCOS[i]≠0.9) && (SOURCOS[i]≠0.8) && (SOURCOS[i]≠0.75) && (SOURCOS[i]≠0.92) && (SOURCOS[i]≠0.83)){

SOURCOS[i]=0.8;

printf («Извините, коэффициент мощности трансформатора узла %3d (N пункта %3d) задан не верно. Принято значение 0.8 n», SOURNk[i], SOURP[i]);}}}

for (i=1; i

{if (TRAN[i]≠0) {if (SOURDLINA[i]==0){ SOURDLINA[i]=1;

printf («Извините, длина участка %3d (N пункта %3d) не задана. Принято значение 1 км. n», SOURNk[i], SOURP[i]);}}}

for (i=1; i

{if (TRAN[i]==0) {

for (r=1; r