Даны два числа. Найти среднее арифметическое их квадратов на языке Паскаль

допустим дано а и б

(а+б)/2

ответ:Временная дискретизация – процесс,при котором, во время кодирования непрерывного звукового сигнала,звуковая волна разбивается на отдельные маленькие временные участки,причем для каждого такого участка устанавливается определенная величинаамплитуды. Чем больше амплитуда сигнала, тем громче звук.Глубина звука (глубина кодирования) — количество бит на кодировку звука. Уровни громкости(уровни сигнала) — звук может иметь различные уровни громкости. Количество различных уровней громкости рассчитываем по формуле N= 2I где I – глубина звука.Частота дискретизации – количество измеренийуровня входного сигнала в единицу времени (за 1 сек). Чем большечастота дискретизации, тем точнее процедура двоичного кодирования.Частота измеряется в герцах (Гц). 1 измерение за 1 секунду -1 ГЦ. 1000 измерений за 1 секунду 1 кГц. Обозначим частоту дискретизации буквой D. Для кодировки выбирают одну из трех частот: 44,1 КГц, 22,05 КГц, 11,025 КГц.Считается, что диапазон частот, которые слышит человек, составляет от 20 Гц до 20 кГц.Качество двоичного кодирования – величина, которая определяется глубиной кодирования и частотой дискретизации.Аудиоадаптер (звуковая плата) – устройство,преобразующее электрические колебания звуковой частоты в числовойдвоичный код при вводе звука и обратно (из числового кода вэлектрические колебания) при воспроизведении звука.Характеристики аудиоадаптера: частота дискретизации и разрядность регистра.). Разрядность регистра -число бит в регистреаудиоадаптера. Чем больше разрядность, тем меньше погрешность каждогоотдельного преобразования величины электрического тока в число иобратно. Если разрядность равна I, то при измерении входного сигнала может быть получено 2I=Nразличных значений. Размер цифрового моноаудиофайла ( A) измеряется по формуле:A=D*T*I/8, где D –частота дискретизации (Гц), T – время звучания или записи звука, I разрядность регистра (разрешение). По этой формуле размер измеряется в байтах.Размер цифрового стереоаудиофайла ( A) измеряется по формуле:A=2*D*T*I/8, сигнал записан для двух колонок, так как раздельно кодируются левый и правый каналы звучания.Учащимся полезно выдать таблицу 1, показывающую, сколько Мб будет занимать закодированная одна минута звуковой информации при разной частоте дискретизации

Удачи)

var i,j,k,m: integer;
    s: string;
begin
  k:=0;
  for i:=1 to 1000000 do
  begin
    s:=IntToStr(i);
    m:=0;
    for j:=1 to (length(s) div 2) do
    if s[j]<>s[length(s)-j+1] then m:=1;
    if m=0 then
    begin
      inc(k); continue;
    end;  
    m:=pos('0',s);
    if m>0 then
    begin
      inc(k); continue;
    end;  
    m:=1;  
    for j:=2 to round(sqrt(i)) do 
    if i mod j = 0 then
    begin
      m:=0;
      break;  
    end;  
    if m=1 then inc(k); 
  end;
  k:=1000000-k;
  writeln('осталось чисел: ',k);
end.

осталось чисел: 544011