ПОМОГИТЕ!!! Запиши математическое выражение (5+x)2 на языке Паскаль.

<span> Одна секунда разбивается на 22050 частей. Каждая часть кодируется 8 битами = 1 байт. Т.е. 1 секунда 22050 байт. Умножаем на количество секунд. Т.е. получится 220500 байт = 220 кб. Проверьте арифметику, может ошибся где. Если сигнал стерео, соответствено умножить на два надо. но так как тут не сказано, то пусть будет моно и ничего умножать не надо.</span>

begin

 try

   var vData := ReadlnString('Введите дату по образцу дд.мм.гг:');

   if vData = '' then Exit;

   var s := vData.MatchValue('(\d\d\.){2}\d\d');

   if s = vData then

   begin

     var d := DateTime.Parse(s);

     $'День: {d.Day}{NewLine}Месяц: {d.Month}{NewLine}Год: {d.Year}'.Println

   end

   else

     'Дата введена не по образцу'.Println

 except

   'Такой даты в календаре не существует'.Println

 end

end.