Алг нач цел Кол_во=256, логтаб Матрица[1:Кол_во] цел Число,j
Матрица[1]:=нет нц для Число от 2 до Кол_во Матрица[Число]:=да кц нц для Число от 2 до div(Кол_во,2) нц для j от 2 до div(Кол_во,Число) Матрица[Число*j]:=нет кц кц нц для Число от 1 до Кол_во если Матрица[Число]=да то вывод Число," " все кц кон
2. Размер цифрового моноаудиофайла измеряется по формуле: A = D*T*i, где D – частота дискретизации (Гц), T – время звучания или записи звука, i - разрядность регистра (разрешение). 44,1 кГц = 44100 Гц A = 44100*2*16 бит = 44100*2*16 / (8*1024) Кбайт = 172,265625 Кбайт ≈ 172,3 Кбайт
3. Общее количество символов для записи номеров = 20+10=30 Для кодирования одного символа необходимо log(2)30 ≈ 5 бит (2^5=32). Для записи одного номера требуется 8*5 бит = 40 бит = 40/8 байт = 5 байт Для хранения 50 номеров потребуется 50*5 байт = 250 байт
нач
цел Кол_во=256, логтаб Матрица[1:Кол_во] цел Число,j
Матрица[1]:=нет
нц для Число от 2 до Кол_во
Матрица[Число]:=да
кц
нц для Число от 2 до div(Кол_во,2)
нц для j от 2 до div(Кол_во,Число)
Матрица[Число*j]:=нет
кц
кц
нц для Число от 1 до Кол_во
если Матрица[Число]=да то
вывод Число," "
все
кц
кон
Результат выполнения программы:
2 3 5 7 11 13 17 19 23 29 31 37 41 43 47 53 59 61 67 71 73 79 83 89 97 101 103 107 109 113 127 131 137 139 149 151 157 163 167 173 179 181 191 193 197 199 211 223 227 229 233 239 241 251