Program pr1;
Var s,k,k1,k2: integer;
Begin
write('Задайте начальное и конечное значения параметра цикла: ');
readln (k1,k2);
s:=0;
for k:=k1 to k2 do
begin
s:=s+6;
writeln(s);
end
End.
1) двоичным или цифровым кодирование
2) нет (1 и 0)
3) да
4) да
5) 8 байт
6) 16 бит
7) 1024 кодов
8) 3 бита
9) файл таблиц
<span>Что мы знаем о войне Немного
По рассказам бабушек и мам
Знаем, что надежда и тревога
Об руку ходили по домам
Слухи зависали как знамена
Дымом застилался горизонт
Многоверстный и многоименный
Жаждал крови ненасытный фронт
А из тыла за волной волна
Шла латать верховные промашки
Всасывала мальчиков война
И выплевывала мертвые бумажки
Каждый шаг к победе ли к беде
Сводки измеряли расстояньем
Даже самый распобедный день
Был комуто вечным расставаньем
Годы возвращающий экран
Очевидцев честные романы
Все равно останутся обманом
Ссадины не заменяют ран
Только изредка за толщей дней
Вдруг всплеснёт сирены голос лютый
Замирая криками детей
И застынет сердце на минуту
</span>
Пусть длина номера = 5
Мощность алфавита = 40
Тогда для записи 1 сивола понадобится 6 бит (2^6 > 40 < 2^5)
6 * 5 = 30 бит на 1 номер. Номер кодируется целым кол-во байт, следовательно 30/8=3.75, отсюда 4 байта отводится на 1 номер.
4*50= 200 байт.