Жюри распределяло места в конкурсе песни. один из членов жюри сказал: “первое место я бы отдал песне “поверь, мне тоже жаль”, а песне “любочка” - второе. другой член жюри заметил: “песне “поверь, мне тоже жаль” я бы отдал второе место, а “песне “школьная пора” - первое. когда места были распределены, получилось, что в каждом из высказываний членов жюри одна часть оказалась верной, а другая - нет. какие песни заняли первое и второе места в конкурсе.

1  место - школьная пора,

2 - место - любочка

решаем от противного (те предполагая).

Var  a,i,s,r,j,t,x,eps: real; function v(x,eps: real): real; begin  i: =1; s: =0; a: =1; t: =1; r: =1;   while abs(sin(x)-s)> eps do begin      while i< =x do begin a: =a*i; r: =r+1 end;   s: =s+t*power(x,i)/a;   t: =-t; a: =1;   i: =i+2  end;   v: =send; begin  read(x);   read(eps);   a: =v(x,eps);   write('sinx=',sin(x));   write('по формуле ',a);   write('количество итераций',i); end.

Будем считать, что появление символов равновероятно. первое сообщение содержит х символов, тогда второе сообщение содержит 2,5х символов. т. к. количество информации (i), которое содержит сообщение, закодированное с знаковой системы, равно количеству информации, которое несет один символ (i), умноженному на число символов в сообщении, то: i = x*i1 i = 2,5x*i2 а т. к. количество информации у нас одинаково, то: x*i1 = 2,5x*i2 i1 = 2,5*i2 2*i1 = 5*i2 а т. к. нам известно, что мощность каждого алфавита не превышает 32, то количество информации, которое несет один символ (i) вычисляется по фомуле: i < = log2(32). т. к. на каждый символ приходится целое число битов, то i может принимать значения 1, 2, 3, 4, 5 битов. подставляя эти значения в формулу соответствия между количеством информации, приходящимся на один символ для первого и второго алфавита 2*i1 = 5*i2, находим, что i1 = 5 и i2 = 2. следовательно, мощность первого алфавита равна 2^5 = 32 символа, а второго алфавита равна 2^2 = 4 символа.