Курсовая работа: Сравнение ожидаемого выхода оксидов азота из газомазутного котла Пп 1000 25 - 545ГМ

writeln (l, 'Расчет температуры газов в топке, Tg(C):');

textcolor(6);

writeln ('при 5% рециркуляции газов через шлицы под горелки, С');

Tg1:=Tg(Tm1);

writeln (' Tg1= ', Tg1:2:3);

writeln (l, 'при 5% рециркуляции газов через шлицы под горелки, С', ' Tg1= ', Tg1:2:3);

writeln ('при 15% рециркуляции газов через шлицы под горелки, С');

Tg2:=Tg(Tm2);

writeln (' Tg2= ', Tg2:2:3);

writeln (l, 'при 15% рециркуляции газов через шлицы под горелки, С', ' Tg2= ', Tg2:2:3);

writeln ('При вводе 5% рециркуляции газов в кольцевой канал горелки, С');

Tg3:=Tg(Tm3);

writeln (' Tg3= ', Tg3:2:3);

writeln (l, 'При вводе 5% рециркуляции газов в кольцевой канал горелки, С', ' Tg3= ', Tg3:2:3);

writeln ('При вводе 15% рециркуляции газов в кольцевой канал горелки, С');

Tg4:=Tg(Tm4);

writeln (' Tg4= ', Tg4:2:3);

writeln (l, 'При вводе 15% рециркуляции газов в кольцевой канал горелки, С', ' Tg4= ', Tg4:2:3);

writeln(l);

gotoxy (22,24);

textcolor(5);

writeln ('Нажмите любую клавишу для продолжения…');

readkey;

clrscr;

textbackground(0);

textcolor(5);

writeln ('Введитезначение:');

writeln ('Коэффициента заполнения сечения топки восходящими потокомами газов, bet');

write ('bet='); readln(bet);