К какой сети подключен ваш кабинет информатики? проверьте с компьютера

Частота дискретизации 256 Гц в практике не встречается, скорее 256 КГц. Ну, это Ваше дело. Итак, 265 Гц - это 256 значений отсчетов уровня звукового сигнала за секунду. 256 - это два в восьмой степени.
128 уровней дискретизации кодируются в диапазоне от 0 до 127, а само число 128 - это два в седьмой степени.
Итого, секунда записи требует для кодирования (2^8)x(2^7)=2^15 бит.
А восемь минут - в 8х60 раз больше. Всего будет (2^15)x8x60 бит.
Переводим в килобайты, учитывая, что байт состоит из 8 бит, а в килобайте 2^10 байт. Получаем (2^15)x8x60/(8х2^10)=(2^5)x60=32x60=1920 (Кбайт).

Var
День,Месяц:byte;
Begin
Write('№ дня = ');ReadLn(День);
Var C:=365-День;
Write('№ месяца = ');ReadLn(Месяц);
Case Месяц of
2:C:=C-31;
3:C:=C-59;
4:C:=C-90;
5:C:=C-120;
6:C:=C-151;
7:C:=C-181;
8:C:=C-212;
9:C:=C-243;
10:C:=C-273;
11:C:=C-304;
12:C:=C-334
End;
if (C mod 100>10)and(C mod 100<20) then Write('До нового года осталось ',C,' дней')
else
Case C mod 10 of
1:Write('До нового года остался ',C,' день');
2..4:Write('До нового года осталось ',C,' дня');
0,5..9:Write('До нового года осталось ',C,' дней')
End
End.