Имеется 16 открыток с живописными 8 городов ( по 2 открытки на один город), расположенных картинками вниз. перевернули две произвольные открытки. сколько бит информации содержит сообщение о том, что на них виды одного и того же города? если ответ не целый, то полученное число округлите в большую сторону.

Занумеруем открытки. Зафиксируем город на открытке с меньшим номером. Среди остальных 15 открыток осталась только одна с тем же городом, поэтому вероятность того, что вторая перевёрнутая открытка с тем же городом, что и первая, равна 1/15.

i = -log2(1/15) = 3.91 бит ~ 4 бита

ответ. 4

Объяснение:

После строки  if k=3 then Writeln(f2,x);

нужно поставить k:=0;

Var f1,f2: text;

i, k, x: integer;

Begin

Assign(f1, 'file1.txt');

reset(f1);

Assign(f2, 'file2.txt');

Rewrite(f2);

k:=0;

While not eof(f1) do

Begin

Readln(f1,x);

writeln(x);

for i:=2 to x do

If (x mod i=0) and (i mod 2=0) then inc(k);

if k=3 then Writeln(f2,x);

k:=0;

End;

Close(f1);

Close(f2);

Writeln('Второй файл содержит числа:');

Reset(f2);

While not eof(f2) do

Begin

Readln(f2,x);

Writeln(x);

End;

readln;

Close(f2);                                 

Итак, за 2 минуты можно передать файл размером 5000 кБайт. Так как результат тоже должен быть в кБайтах, то мы можем не переводить в байты. Но так как сначала даны минуты, а потом секунды, то либо мы сначала переводим минуты в секунды, либо секунды в минуты.

Чтобы найти скорость передачи файла, нужно количество кБайт(S) разделить на время, за которое этот файл передался. Так как последующий файл отправляется по тому же соединению, то их скорости равны. Значит нужно некоторое x разделить на 48 секунд (или минут, если ты перевёл(ела) в минуты).

5000/120=х/48
120х=240000
х=2000

Или, если ты перевёл в минуты, то
5000/2=х/0,8
2х=4000
х=2000
ответ: 2000