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

первый файл займет 2750/1054 =2,6 = 3 кластера(может быть только целое число кластеров).

второй файл займет 324000/1024 = 307,4 = 308 кластеров.

 

ответ: 3 + 308 кластеров

 

мощность n=16

n=2^i где i-количество информации в символе

тогда i=4

информационный объем i равен i*k где k - количество символов в тексте

значит i =4*540=2160

var  a: array [1..10] of integer;

n,i: integer;

begin

  {vvod massiva skopirovat suda}

  for i: = 1 to 10 do begin

      if a[i] mod 10 = 0 then

          n: =n+1;

  end;

  writeln(n);

end.

Program is_ev_2d; var n: integer; begin   write('введите число: ');   readln(n);   if (n mod 2 = 0) and (n > 9) and (n < 100) then     writeln(n, ' чётное двузначное')   else      writeln(n, ' не чётное двузначное') end.