у списку[27,3,12,22,37,8] знайти максимальний елемент,вилучити елемент на другій позиції, упорядкувати новий список у порядку збільшення значень його елементів зі збереженням попереднього списку,вставити в нього на четверту позицію число 5, потім замінити значення першого елемента на число10

задача 1

запишем условие: строк=40, символов=50, страниц=10, I=12500 байт, N-?

решение: посчитаем общее кол-во символов в тексте К=40*50*10=20000

переведем информационный объем в биты I=12500*8=100000 бит

из формулы I=K*i найдем i: i=I/K=100000/20000=5бит

из формулы мощности алфавита найдем мощность

N=2^5=32                  это и есть ответ

задача2

запишем условие: страниц=180, символы=2048, N=128, I(Кб)-?

решение: вычислим общее кол-во символов в тексте

К=180*2048=368640

найдем вес одного символа алфавита N=2^i, 128=2^i, 2^7=2^i, i=7 бит

подсчитаем информационный объем текста I=368640*7=2580480 бит=

322560 байт=315 Кб                это и есть ответ

задача3

запишем условие: N=87, K=200, I-?

решение: из формулы мощности алфавита найдем i с учетом того, что 87 не является целой степенью двойки. ближайшая мощность алфавита -64, поэтому i=6 бит

вычислим информационный объем I=K*i=200*6=1200 бит/8=150 байт

Program egor_sasha; var num_eg, num_sash,pri,pri1: real; var mes_eg,mes_sash: real; beginwriteln('numer egora'); readln(num_eg); writeln('numer sashi'); readln(num_sash); writeln('mesto egora (verkh=1,vniz=0)'); readln(mes_eg); writeln('mesto sashi (verkh=1,vniz=0)'); readln(mes_sash); pri: =num_sash+1; pri1: =num_eg+1; if num_eg=pri then    writeln('yes')  else writeln('no'); if num_sash=pri1 then    writeln('yes')  else writeln('no'); if mes_eg=1 then    writeln('egor-high')else  writeln('egor-low'); if mes_sash=1 then    writeln('sasha-high')else  writeln('sasha-low'); end.