Определить значение s (с решением) s: =1; a: =1 нц для i от 1 до 3 s : = s+i нц для j oт 2 до 3 s : = s+j кц кц

S-длина эскалатора tл-скорость человека tе-скорость эскалатора s=60(tл+tе) s=45(2tл+tе) s=60tл+60tе s=90tл+45tе умножим первое уравнение на 1,5 1.5s=90tл+90tе s=90tл+45tе вычтем из первого второе: 0,5s=45te за 45 секунд эскалатор проедет половину пути. за 90 весь путь. ответ 90 сек.

размер цифрового моноаудиофайла измеряется по формуле:         a = d*t*i,

где d – частота дискретизации (гц), t – время звучания или записи звука(сек), i - глубина кодирования(байт)

 

т.к. у нас стерео файл, то он будет занимать в 2 раза больше места при тойже продолжительности(т.к. в нем хранится 2 монодорожки)

 

16 бит = 2 байта

 

а = 44000 * 300 * 2 = 26400000 байт = 25781,25 килобайт =  25,177 мегабайт

 

это для монофайла

 

а для стерео в 2 раза больше

 

52800000 байт = 51562,5 килобайт = 50,354 мегабайт

 

var //это ключевое слово показывает что началось объявление переменных  b, i: integer;   //тут показали что переменные b, i  типа integer т.е. целые  summ: real; {тут показали что переменные summ  типа real т.е. дробная в ней будет хранится наша сумма} begin // это слово показывает на начало выполнения программы  summ : = 0;   //присваиваем начальное значение суммы  write('b = '); readln(b);   //выводим на экран 'b = ' и считываем b  for i : = 1 to b do {повторяем следующую операцию b раз причем каждый раз i будет увеличиваться на 1 изначально i присваивается 1}      summ : = summ + i * i / 2; {присваиваем сумме ее же значение плюс сразу  квадрат переменной i деленный на 2}  writeln('s = ', summ); //выводим 's = ' и за ним сразу значение суммы  readln; //ожидаем нажатия клавиши enterend. //конец выполнения программы