Question

В базе данных хранятся записи, содержащие информацию о датах. Каждая запись содержит три поля: год (число от 1 до 2100), номер месяца (число от 1 до 12) и номер дня в месяце (число от 1 до 31). Каждое поле записывается отдельно от других полей с помощью минимально возможного числа бит. Определите мини­мальное количество бит, необходимых для кодирования одной записи.

Answer 1

type
  Data = record
    Year: 1..2100;
    Month: 1..12;
    Day: 1..31;
  end;
begin
  writeln(sizeof(Data) * 8, ' бит'); {sizeof(Data) показывает размер типа Data в байтах

                                                 умножение производится для перевода байтов в                                      биты}

end.