Var
a,b:array[1..100]of integer;
i,max,min,n:integer;
begin
readln(n);
max:=0; min:=32;
for i:=1 to n do
begin
readln(a[i],b[i]);
if a[i]>max then max:=a[i];
if b[i]<min then min:=b[i];
end;
if min>=max then
writeln('YES')
else writeln('NO');
end.
Пример:
3
1 5
3 10
4 14
<span>YES</span>
1 1112
2 2022112120
3 110131121
4 1221
Задача a
Общий вес текста/сообщения:
I = K * i (K - кол-во символов, i - вес одного символа/бит на символ)
K = 2 * 32 * 64 шт = 4096 шт
i = 24 бит
Вес текста I = K * i = 4096 * 24 бит = 98304.0 бит
98304.0 бит = 12288.0 байт = 12.0 Кбайт
Задача b
16384.0 бит = 2048.0 байт = 2.0 Кбайт