Нужно искать близжаюшую степень двух, большую размера алфавита.
1) 7 символов, близжайшее 8 (2^3), значит вес символа алфавита 3 бита
3*21=63 (бита)
2)12 символов, близжайшая степень двойки 16 (2^4), вес символа алфавита 4бита.
4*64=2^8=256 (бит)
3)20 символов, близжайшая степень 32 (2^5), вес символа 5 бит.
5*40=200 (бит)
4) 54 символа, близжайшее 64 (2^6), вес символа 6 бит
6*120=720 (бит)
Решение - в прилагаемом файле (Лист1 и Лист2).
Ты когда-нибудь наливал воду в форму для льда? Допустим, в одной ячейке умещается 1 ложка воды, но тебе нужно залить полторы ложки. Естественно, в одной ячейке столько не уместится, и тогда половина ложки перельется в другую ячейку. Точно так же и в этой задаче: в одном блоке (образной ячейке) умещается 2 Кб данных, но файл весит 2500 байт, то есть чуть больше. Надеюсь, я все правильно понял и помог)
Мы находимся в точке по горизонтали А и по вертикали А. Нам нужно попасть в точку F. Смотрим напротив строки А по горизонтали и вертикали куда можно идти, есть три варианта: сразу в F, в точку В и в точку С. Если идти сразу в F то пройденный путь составит 18. Но нам нужен кратчайший путь поэтому ищем где цифра поменьше например С. Идём в С и пройденный путь уже составляет 3, теперь смотрим по вертикали (т.к по горизонтали мы можем пойти только в точку F но нам нужен наименьший путь) куда лучше пойти и где значение меньше и это D т.к там значение наименьшее - 1.Идём в эту точку и путь уже равен 3+1=4, смотрим по горизонтали напротив D и видим что сразу можем попасть в точку F. Доходим до конца и путь составляет 4+3=7 - это кратчайший путь.
Лучше советую смотреть сразу минимальное значение в столбике F и от неё смотреть путь до точки А.
Либо рисовать графы как в комментарии выше, что скорее гораздо понятнее но дольше
Ответ:
Var i:integer
Begin
For i:=-5 to 5 do
Writeln (2*sin(0.2*i*3));
End.
