1) в 16-ти символьном алфавите каждый символ кодируется 4-мя битами
( 2^4=16 ----> 4 бита ~ 1 символ, 4=2^2)
2) 1 Мбайт=2^20 байт=2^23 бит
1/16=1/2^4
1/16 Мбайта=2^23/2^4 бит =2^19 бит
3) 2^19/ 2^2=2^17 (символов в тексте) =
=2^10 * 2^7=1024*128 =131 072 (символа)
ответ 131 072 символа в сообщении
Обозначу отрицание за корень
Отсюда высказывание ложно на полуинтервале [6; 7)
Из целых чисел подходит 6.
Ответ: [6; 7)
var
Str1,c : string;
l,i : integer;
r : boolean;
begin
readln (Str1);
r := true;
i := 1;
l := Length (Str1);
While (r) and (i <= l) do
begin
c := copy (Str1,i,1);
if (c <> '1') and (c <> '0') then
r := false;
i := i + 1;
end;
if r then
{writeln ('Ok')}
else
writeln ('Недопустимый символ!');
<span>end.</span>
I = 2.
A = 6.
1. A = 6 + 2 = 8.
I = 2 + 1 = 3.
2. A = 8 + 3 = 11.
I = 3 + 1 = 4.
3. A = 11 + 4 = 15.
I = 4 + 1 = 5.
Ответ: A = 15, I = 5.