«в каждом человеке есть солнце, только дайте ему светить » , если информационный вес одного символа равен 2 байта.

Если правильно написано, то 55 символов. 55*2= 110 байт или 880 бит

Объективность=Эти брюки стоят три тысячи рублей
необъективность=Эти брюки дорого стоят
Достоверность= все ныне живущие люди умрут
недостоверность=люди бессмертны
полнота=Ира, моя родная сестра, приехала погостить на пару дней
неполнота=девушка
актуальность=на вашем счёте 2 рубля
неактуальность=в 1894 на счёте вашего прапрадедушки было семь шекелей
ценная информация=хорошо написанная статья о том как вылечить больную печень. эта информация ценна для пьяницы
не ценная=та же статья но для здорового шахтёра в уральских горах ценна не будет
понятная информация=в долларе 56,89 рубля
непонятная информация=ドル56.89ルーブル

Сначала выведем нужную формулу.а) Определим объем памяти, необходимый для хранения 1с звучания.Частота дискретизации 44,1 кГц означает, что за 1с делается 44100 отсчетов (измерений) уровня звукового сигнала. Глубина кодирования 24 бита = 24/8 = 3 байта означает, что для хранения одного отсчета в одном канале потребуется 3 байта. В режиме стерео используется два канала, поэтому количество байт, необходимое для одного отсчета составит 2×3=6 байт. Тогда для 1с звучания потребуется 44100×6 = 264600 байт.

Предлагается следующий алгоритм.
1. Ввести время записи в минутах n.
2. Перевести минуты в секунды, умножив n на 60.
3. Получить размер файла в байтах, умножив результат (2) на 264600.
4. Перевести результат в мегабайты, поделив результат (3) на 1024².
5. Округлить результат (4) до целых в большую сторону.
6. Вывести значение, полученное в (5)

Конечная формула:



PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!

begin
  var n:=ReadReal('Введите время записи в минутах');
  var v:=Ceil(264600*60*n/1024/1024); // округление "вверх"
  Writeln('Размер файла ',v,' Мбайт')
end.