Прости, что отвечаю через 2 часа, был не дома)
var
i, j, n : integer;
flag : boolean;
begin
write('n = ');
read(n);
for i := 2 to n do begin
flag := true;
for j := 2 to i-1 do
if (i mod j = 0) then begin
flag:=false;
break;
end;
if flag = true then write(i, ' ');
end;
1. Используем формулу N=2^I
1,5 байта = 1,5*8 бит = 12 бит.
Число уровней квантования = 2^12 = 4096
2. Размер цифрового стереоаудиофайла измеряется по формуле:
V = 2*D*i*T,
где D – частота дискретизации (Гц), T – время звучания или записи звука, i - разрядность регистра (разрешение).
V = 2*16000*8*2*60 бит = 2*16000*8*2*60 / 8 байт = 2*16000*2*60 байт =
2*16000*2*60 / 1024 Кбайт = 3750 Кбайт
12 Мбайт= 12 * 1024 кбайт
t=s/v
t=12*1024/4=3072 секунд=51.2 мин
Короче решение вроде бы так 448*124*8/1024/512=7 а 2 в 7 степени ровно 128
Способы вызова:
Нажатием правой кнопки мыши (для правшей).
Специальной клавишей Menu .
Сочетанием клавиш: в Windows и Linux — ⇧ Shift + F10 , в OS X — щелчок кнопкой мыши при нажатой клавише Ctrl ;
в OS X можно также вызвать контекстное меню для выделенного объекта через кнопку «Action».