Добавил:
Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
0- 0_Вычислительная практика_2.doc
Скачиваний:
10
Добавлен:
22.06.2014
Размер:
111.1 Кб
Скачать

Ново – зиминская тэц

Строительство ТЭЦ началось летом 1972 г.

Проектная мощность всей станции 650 мегаватт.

Ново-зиминская ТЭЦ станция высоких параметров.

Часовая мощность: по электричеству – 240 мегаватт, по горячей воде –427 гигакалорий, по пару – 250 тонн.

Ново-зиминская ТЭЦ снабжает горячей водой : г. Саянск, тепличный комбинат, птицефабрику. Завод химической промышленности снабжается горячей водой и паром.

Введена автоматическая система управления тепловых процессов.

Цех топливоподачи обеспечивает бесперебойное снабжение ТЭЦ углем, мазутом. В технологическом процессе используется твердое топливо Тулунского угольного разреза, мазут марки М-40,М-100АНХК.

Котлотурбинный цех состоит из двух отделений: котельного и турбинного, что позволяет в полном объеме выполнять цикл от выработки пара и его генерирования в тепловую и электрическую энергию.

Задачи электроцеха связаны с деятельностью всех цехов и подразделений станции.

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

Цеха централизованного ремонта оборудования

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

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

Химический цех обеспечивает выработку обессоленной воды с проектной производительностью 457 тонн в час для восполнения потерь связанных отпуском энергоносителей в виде пара и ХОВ на ОАО “Саянскхимпласт”, покрывает нужды промышленных предприятий и г. Саянска для горячего водоснабжения и подпитки теплосети в количестве до 800 тонн в час.

Цех тепловой автоматики и измерений (ТАИ) производит монтаж, наладку, эксплуатацию и ремонт средств технического контроля, технологической автоматики, защиты и сигнализации котлотурбинного, химического, топливо - транспортного цехов.

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

Наряду со штатными приборами с 1996 года контроль технологических параметров ведется с помощью Информационной системы котлотурбинного цеха, в которую на данный момент включено более 500 технологических параметров по расходу, давлению, температуре, и электрических параметров. Оборудованы автоматизированные рабочие места, где на экранах мониторов обледененных в сеть компьютеров, машинисты котлов и турбин, начальник смены станции, технологический отдел, гл. инженер имеют возможность следить за ходом технологического процесса и состоянием оборудования.

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

Одной из перспективных задач цеха на ближайшую пятилетку является монтаж и освоение управляющих автоматизированных систем контроля (АСУ) при управлении котлами и турбинами, а также внедрение водно-химического мониторинга.

2

a) Цех малярной продукции за одну смену производит: синтетической шпаклевки A [т], шпаклевки масляной B [т], грунтовки глиноземной C [т], пасты меловой D [т], замазки меловой E [т], замазки суриковой F [т], масляных окрашивающих составов G [т], водно-масляной эмульсии H [т].

Составить алгоритм и программу для расчета количества выпускаемой продукции за месяц, если в первую декаду цех работал в одну смену, во вторую – в полторы смены, в третью – в две смены. Результат вывести на печать.

Решение

K= A+B+C+D+E+F+G+H – количество всей продукции выпускаемой за одну смену;

10K– количество продукции выпущенной за первую декаду. Цех работал в одну смену.

15K– количество продукции выпущенной за вторую декаду. Цех работал в полторы смены.

20K- количество продукции выпущенной за третью декаду. Цех работал в две смены

M= 45K– количество всей продукции выпускаемой за месяц.

Исходные данные: A, B, C, D, E, F, G, H.

Для решения задачи составим алгоритм. Разработанный алгоритм имеет линейную структуру:

K = A+B+C+D+E+F+G+H

M = 45K

На основе алгоритма составим программу для решения данной задачи:

Program production;

var A, B, C, D, E, F, G, H: real;

K, M: real;

begin

writeln(' РАСЧЕТ КОЛИЧЕСТВА ПРОДУКЦИИ ВЫПУСКАЕМОЙ ЗА МЕСЯЦ'); readln;

writeln ('Введите количество продукции производимой за одну смену:');

write ('Синтетической шпаклёвки - '); readln(A);

write ('Шпаклёвки масляной - '); readln(B);

write ('Грунтовки глиноземной - '); readln(C);

write ('Пасты меловой - '); readln(D);

write ('Замазки меловой - '); readln(E);

write ('Замазки суриковой - '); readln(F);

write ('Масляных окрашивающих составов - '); readln(G);

write ('Водно-масляной эмульсии - '); readln(H);

K:=A+B+C+D+E+F+G+H;

M:=45*K;

Writeln ('Количество продукции выпускаемой за месяц:' , M, ' тонн(ы)'); readln;

end.

b)Самолёт летит из пункта A в пункт B со средней скоростью v. Составить алгоритм и программу для нахождения времени полёта при условии что, скорость встречного ветраможет изменяться от 0 до 15 м /сек. Считать шаг изменения=0,5 м/сек.

Решение

Математическая формулировка задачи:

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

Если же есть встречный ветер, то время полета находим по формуле ,

где t1, t2 – время полета [сек];

S – расстояние полета [м];

V – средняя скорость самолета [м/сек];

V1 – скорость встречного ветра [м/сек].

Исходные данные S, V.

Для написания программы разработаем алгоритм, структура которого приведена на рисунке 1.

Из схемы алгоритма следует, что вначале в блоке 2 вводятся расстояние полета S и средняя скорость самолета, затем (блок 3) встречному ветру присвоено первоначальное значение 0, поэтому время полета вычисляем без учета скорости встречного ветра (блок 4), выводим полученный результат на печать (блок 5). Теперь изменим значение встречного ветра, увеличив на 0.5 – шаг изменения (блок 6). Вновь полученное значение проверяем условием V1  15 (блок 7), и если это условие выполняетя, то вычисляем время полета с учетом скорости встречного ветра (блок 8). Выводим результат на печать (блок 9). Затем присвоим новое значение встречному ветру увеличив на шаг(блок 10), возвращаемся к условию и вновь выполняем его. Если условие перестанет выплнятся, то вычисления должны быть закончены (блок 11).

Р

Да

Нет

исунок 1.

Исходя из условия задачи и структуры разработанного алгоритма, составим программу:

Program time;

var S, V: real;

V1,t1,t2:real;

begin

writeln (' РАСЧЕТ ВРЕМЕНИ ПОЛЕТА');

write ('Введите расстояние полета (м): S='); readln(S);

write ('Введите среднюю скорость самолета (м/сек): V='); readln(V);

V1:=0;

t1:=S/V;

writeln ('Время полета без встречного ветра равно',t1,' сек.'); readln;

V1:=V1+0.5;

while V1<=15 do

begin

t2:=S/(V – V1);

writeln ('Скорость встречного ветра: ' ,V1 , ' м/сек.' , ' Время полета: ', t2 , ' сек. ');

V1:=V1+0.5;

end;

readln;

end.

c) Составить алгоритм и программ для расчёта функции если Х изменяется от 0,1 до 10 с шагом ∆х=0,13, аd от 1,2 до 5,4 с шагом ∆d =1,1.

Решение

Из условия задачи следует, что для каждого значения x необходимо перебрать все возможные значения d.

Исходные данные x, d.

Для написания программы разработаем алгоритм, ниже приведена его структура:

Да

Нет

Нет

Да

Из представленной схемы алгоритма видим, что вначале (блоки 2, 3) значениям x и d присваиваются начальные значения 0.1 и 1.2 соответственно, затем вычисляем величину y (блок 4), а результат вычислений выводим на печать (блок 5). Также на печать выводим значения переменных x и d, которым это y соответствует.

В блоке 6 величине d присваивается новое значение, равное сумме предыдущего и величине шага изменения d. Вновь полученное значение проверяется по условию d>5.4 (блок 7), и если это условие не выполняется, то вновь вычисляется значение y (блок 4) и печатаются значения x, d, y (блок 5). Затем значение y вновь увеличивается на величину шага, и процесс будет повторяться до тех пор, пока d станет больше 5.4. Это означает, что одного конкретного значения x и всех возможных значений d вычисления для получения y сделаны, и можно теперь присваивать новое значение величине x (блок 8). Для нового значения x повторяются все операции, изложенные выше, т. е. проводится цикл действия в блоках 4, 5, 6, 7. Этот цикл будет повторяться столько раз, сколько значений примет величина x при условии y>10. Когда это условие выполниться, то все вычисления должны быть закончены.

Составим программу:

Program examp;

var x, d, y: real;

begin

writeln(' ПРОГРАММА РАСЧЕТА ПО ЗАДАНОЙ ФОРМУЛЕ'); readln;

x:=0.1;

repeat

d:=1.2;

repeat

y:=10*sin(d*x)/(1+sqr(d)*sqr(x));

writeln('x=',x,' d=',d:3:1,' --> y=',y:6:2);readln;

d:=d+1.1;

until d > 5.4;

x:=x+0.13;

until x > 10;

readln;

end.