n (file1, x: 3, '', lf: 5:1, '', gt: 6:4, ' ', Gb: 6:3,' '
eg: 5:3, '', ag: 5:3, '', es: 5:3, '', hf: 6:0, '', tf: 6:0, '', qf: 5:0);
End;
{============================================== ==============================}
Procedure tFurnace. Nomina;
{============================================== ==============================}
Begin
Append (File1); Writeln (File1); Writeln (File1, 'ПОЗНАЧЕННЯ:');
Writeln (File1, 'X - відносна відстань x/d0 (номер розрахункового перетину) ');
Writeln (File1, 'LF - відносна довжина факела LФ/d0');
Writeln (File1, 'GT - частка незгорілого палива від надійшов в пальник Gт/G0 ');
Writeln (File1, 'GB - відносна кількість повітря, залученого в факел, Gb/G0 ');
Writeln (File1, 'EG - ступінь чорноти газоподібного середовища в факелі ');
Writeln (File1, 'AG - поглощательная здатність факела');
Writeln (File1, 'Es - приведена ступінь чорноти факела');
Writeln (File1, 'HF - ентальпія газоподібного середовища у факелі');
Writeln (File1, 'Tf - середня температура в поперечному перерізі факела, В° C ');
Writeln (File1, 'Qf - тепловіддача факела, кВт');
Writeln (File1);
Close (file1);
End;
{============================================== ==============================}
BEGIN
Furnace. Fakel;
END.
Результати виконання програми № 1:
X LF GT GB EG AG ES HF TF QF
2 148.6 0.9708 0.475 0.254 0.123 0.122 1195 306 -11
4 171.4 0.9472 0.824 0.286 0.146 0.146 1737 390 -31
6 184.8 0.9259 1.147 0.308 0.164 0.163 2073 454 -62
8 193.9 0.9059 1.457 0.325 0.178 0.176 2308 512 -102
10 200.5 0.8866 1.761 0.337 0.190 0.188 2483 565 -151
12 205.6 0.8679 2.062 0.347 0.201 0.199 2619 615 -211
14 209.6 0.8498 2.359 0.354 0.211 0.208 2727 663 -279
16 212.9 0.8320 2.655 0.360 0.220 0.216 2814 710 -356
18 215.6 0.8146 2.949 0.364 0.228 0.223 2886 755 -442
20 217.8 0.7976 3.243 0.367 0.235 0.230 2946 798 -534
22 219.8 0.7809 3.535 0.369 0.242 0.236 2996 840 -634
24 221.5 0.7645 3.827 0.370 0.249 0.242 3038 881 -739
26 223.0 0.7484 4.118 0.370 0.254 0.247 3073 921 -849
28 224.3 0.7325 4.409 0.370 0.260 0.251 3103 960 -962
30 225.5 0.7169 4.700 0.369 0.265 0.255 3128 997 -1078
32 226.5 0.7016 4.990 0.367 0.270 0.259 3149 1034 -1195
34 227.5 0.6866 5.279 0.366 0.274 0.263 3166 1069 -1312
36 228.3 0.6717 5.569 0.363 0.278 0.266 3180 1103 -1428
38 229.1 0.6571 5.858 0.363 0.282 0.269 3191 1136 -1544
40 229.8 0.6428 6.147 0.358 0.286 0.272 3199 1168 -1654
42 230.5 0.6287 6.435 0.3...
