Дополните таблицу устройствами ввода /передачи и внешней памяти: устройства ввода,внешняя память,устройства вывода,устройства передачи/приема

var

 A: array [1..5] of Integer;

 i, c, nc: Integer;

begin

 c := 0;

 nc := 0;

 Randomize;

 for i := 1 to 5 do begin

   A [i] := Random (10);

   WriteLn (i, ': ', A [i]);

   if A [i] mod 2 = 0 then

     c := c + 1

   else

     nc := nc + 1;

 end;

 if c > nc then

   WriteLn ('четных элементов больше')

 else if nc > c then

   WriteLn ('нечетных элементов больше')

 else if nc = c then

   WriteLn ('четных и нечетных элементов равное количество');

 ReadLn;

end.

// Условие: "nc = c" написано "для надежности", такого быть не должно, так как количество элементов нечетно

1) процессы монтажа теплотехнического оборудования;

2) систему работы котельных на различные видах топлива;

3) организацию ремонтных работ тепловых сетей;

4) основы проектирования котельных и тепловых сетей;

5)процессы реконструкции тепловых сетей;

6) основные положения действующей нормативной документации по профилю специальности;

7) технологию производства, транспорта и использования тепловой энергии;

8) устройство, принцип действия, теплотехнические и эксплуатационные характеристики основного и вс теплотехнического оборудования;

9) методы расчеты тепловых схем;

и средства измерения автоматизации тепловых процессов; методы обнаружения и устранения дефектов в работе установок и оборудования.