A-50 Б-30 В-20 Г-5
Один из возможных вариантов кодирования:
А=0 (1 бит) Б=10 (2 бит) В=110(3 бита) Г=111 (3 бита)
Всего: 50*1+30*2+20*3+5*3=50+60+60+15=185 (бит) <---- ответ
Нужно умножить на 1024 и умножить на 8
1. Брамс Б.Г. является матерью Брамс Т.А.
Выписывем из Таблицы 1 значения ID и пол. Брамс Б.Г. (37, Ж), Брамс Т.А. (36, Ж). Оба пола женские, продолжаем поиск.
Ищем в Таблице 2 строку, где ID_Родителя=37 и ID_ребенка=36.
Такой строки нет, следовательно утверждение 1 ложно.
2. Ващенко Г.Г. является матерью Брамс Б.Г.
Брамс Б.Г. (37, Ж), Ващенко Г.Г. (38, М). Пол Ващенко Г.Г. мужской, поэтому он не может являться матерью. Утверждение 2 ложно.
3. Рисс Н.В. является дочерью Мирон Г.В.
Мирон Г.В. (66, Ж), Рисс Н.В. (56, Ж). Оба пола женские, продолжаем поиск.
Ищем в Таблице 2 строку с 66 и 56, такая строка есть.
Утверждение 3 истинно.
4. Ващенко К.Г. является дочерью Брамс Т.А.
Ващенко К.Г. (48, М), Брамс Т.А. (36, Ж).
Ващенко К.Г. имеет мужской пол, поэтому он не может являться дочерью.
Утверждение 4 ложно.
Ответ: истинно утверждение номер 3.
Все числа, в которых присутствует цифра больше 4
var
month: integer;
Begin
Write('Введите номер месяца: ');ReadLn(month);
case month of
1..2, 12: Write('Зима');
3..5: Write('Весна');
6..8: Write('Лето');
9..11: Write('Осень');
end;
End.