5 байт, 2 бита или 42 бита (как удобно)
Как я посчитал 8,388...... Вобщем около 8,4 мб (но это не точно)
По горизонтали:
1. Ч<span>исловая
5. </span><span>Графическая
8. </span><span>Звуковая </span><span>
9. </span>Информатика
<span>10. Т</span>екстовая
<span>По вертикали:
2. </span>Видеоинформация<span>
3. </span>Органы чувств.
4. Данные.<span>
6. </span>Компьютер<span>
7. </span>Информация
Начинаем с пунта А, можно взять как верхний ряд букв, так и левый ряд. Я возьму верхний.
Смотрим какие цифры под буквой А. Это 3, 9, 5. Цифра 3 стоит в ряду с буквой В, цифра 9 в ряду с буквой С, цифра 5 в ряду с буквой D. Эти цифры означают расстояние между этими пунктами.
Будет удобнее решать, если построить схему.
Если условие записано верно, то таблица истинности имеет такой вид (но само выражение не тождественно истинное!):
Var
A,Max1,Max2:integer;
Begin
Max1:=0;
Max2:=0;
Repeat
Read(A);
if A>Max1 then
Begin
Max2:=Max1;
Max1:=A;
End;
Until A=0;
WriteLn(Max2);
End.