Вот решение:
- 1 байт - 8 бит
- 128 бит - 16 байт
- 1 КБ - 8192 бит
- 1,5 КБ - 1536 байт
- 2048 байт - 2 КБ
- 2 Мбайт - 2048 КБ
- 81920 бит - 10 КБ
- 1,5 Мбайт - 1572864 байт
Лови шпаргалку, может пригодится
<span>Описывается список с полями согласно заданию
type
student = Record
fam: String;
inn: string;
Year: integer;
god_p: integer;
kurs: 1..5;
gruppa: string;
b1, b2, b3: 1..5;
End;
Объявляются необходимые переменные и массив с типом записи</span>
<span>var
spisok: Array [1..N] Of student;
b, a: string;
i, j, k1: Integer;
И заполняется от 1 до N (N=5 установлена константа)
for i := 1 To N Do // идем от 1 до N и заполняем список
with spisok[i] Do
begin
Writeln('Введите фамилию');Readln(fam);
{......}
end;
Потом обрабатывается согласно заданию по вариантам
Скорее всего, что-то типо сортировки по году рождения, самых молодых пихают в начало.(глупо. можно было не городить такой кусок кода, а уместить все в один цикл с проверкой и выводом ИМХО)
Затем выводится 3 фамилии самых молодых
</span>
<span>for i := 1 to 3 do
begin
write(spisok[i].fam);
writeln;
end;</span>
<span>Ответ: 2 бита
Есть четыре равновероятных события
Информация, о том, что произошло какое-то из этих событий равна двоичному логарифму из количества событий (4)
двоичный логарифм 4 равен 2</span>
Объяснение:
Вот таблица, горизонтальные не принимает;)
1<span> это правовой инструмент, определяющий использование и распространение по</span>, защищённого авторским правом
2<span>свободно распространяемое п</span>о<span>, с возмездным (или возмездным при определенных условиях) использованием.
3</span>свободный софт<span> —по</span><span>, пользователи которого имеют права («свободы») на его неограниченную установку, запуск, а также свободное использование, изучение, распространение и изменение (совершенствование), и распространение копий и результатов изменения</span>