Определить количество уровней сигнала 24-битной звуковой карты .

иероглифы обозначали целые слова и слоги, их было более 750

пщояк 17 27 16 33 17

нщёп 15 27 7 17

var a: array [1..9] of real;

s,p: real;

begin

  p: =1;

  s: =0;

  for i: = 1 to 9 do

  begin

      read(a[i]);

      s: = s+a[i];

      p: =p*a[i];

  end;

  writeln("summa=",s);

  writeln("srednee arefmeticheskoe=",s/n);

  writeln("proizvedenie=",p);

end.

б,в,г,е - лцд остальное к трубке