Можно ещё использовать оператор выбора case
Program pr;
uses crt;
Var k:integer;
Begin
Writeln('Введите k');
readln(k);
if (k>=1) and (k<=5) then
Begin
case k of
1: Writeln('Плохо');
2: Writeln('Неудовлетворительно');
3: Writeln('удовлетворительно');
4: Writeln('Хорошо');
5: Writeln('Отлично');
end;
end
else Writeln('Ошибка');
readln;
end.
Для кодирования одного из 512 цветов требуется log(2)512=9 бит (2^9=512).
8192 Мбайт = 8192*1024*1024*8 бит
Длительность видеоролика = 8192*1024*1024*8 / (1440*900*50*9) ≈ 117 с
Потому что это классическая задача о трех домах и трех колодцах, она не имеет решения, один (пусть последний) путь обязательно невозможно построить не рересекая другой.
Знайка это знал, и предложил им помериться
С какими списками? Я не знаю по какому учебнику вы учитесь)
6144 байт = 49152 бит
49152/12288= 4 бит информационный вес одного символа
N=
символов в алфавите