<span>Ответ: 2 бита
Есть четыре равновероятных события
Информация, о том, что произошло какое-то из этих событий равна двоичному логарифму из количества событий (4)
двоичный логарифм 4 равен 2</span>
4 двоичных переменных, значит 2⁴=16 строк -полное множество возможных значений
Единица измерения, Бит, Байт, КБ(КилоБайт), МБ(МегаБайт), ГБ(ГигаБайт), ТБ(ТераБайт)
Var
max, i : integer;
a : array [1..20] of integer;
begin
max := -1;
for i := 1 to 20 do read (a[i]);
for i := 1 to 20 do
if (a[i] < 1000) and (a[i] > 99) and (a[i] mod 4 = 0) and (a[i] > max) then
max := a[i];
if max > -1 then write (max) else write ('Nety');
end.