Транзистор какое поколение​

-Транзисторы. ЭВМ 2-го поколения..

Транзистор 2-е поколение

Объяснение:

Это правильно

Const   n = 20; var   t: array[1..n] of integer;   mean: real;   i, k: integer; begin   writeln('введите ', n, ' элементов массива');   for i : = 1 to n do   begin       read(t[i]);       mean : = mean + t[i]   end;   mean : = mean / n;   k : = 0;   writeln(#13#10, 'введено: ');   for i : = 1 to n do write(t[i]: 5);   writeln(#13#10, 'элементы массива, превышаюшие среднее арифметическое ',           mean: 0: 2);   for i : = 1 to n do       if t[i] > mean then       begin           write(t[i]: 5);           k : = k + 1       end;   writeln(#13#10, 'найдено элементов, превышаюших среднее арифметическое: ', k) end. тестовое решение: введите 20 элементов массива 5 17 28 45 -20 34 9 18 42 -36 18 36 0 24 5 45 -7 12 1 21 введено:       5    17    28    45  -20    34      9    18    42  -36    18    36      0    24      5    45    -7    12      1    21 элементы массива, превышаюшие среднее арифметическое 14.85     17    28    45    34    18    42    18    36    24    45    21 найдено элементов, превышаюших среднее арифметическое: 11