Клиенту необходимо правильно принять переданное ему сообщение.

сообщение состоит из последовательности, составленной из букв a,b,c,d.

при передаче сообщения каждая буква кодируется последовательностью нолей и единиц, которые и по каналу.

в процессе передачи и приема в канале могут возникать ошибки.

частота появления ошибок в канале постоянна. ошибкой считается случайное изменение 0 на 1 или 1 на 0. таким образом принимается не всегда тот код, который был передан.

при декодировании принятого сигнала выбирается та буква, код которой наиболее близкой к принятому коду в смысле расстояния хэмминга.

необходимо из трех предложенных вариантов кодирования выбрать вариант правильно принимать переданное сообщение при самой высокой частоте ошибок.

формат примеров входных файлов

символ код1 код2 код3

a 000100 000101 010010

b 000110 100101 011010

c 001010 010101 001010

d 010010 001000 000100

выходной файл содержит номер наилучшего шифра:

1

//Pascal ABC.NET 3.1 сборка 1256

uses
 GraphABC;

 Var
 n:integer;

 procedure square(var n:integer);
begin
readln(n);
rectangle(window.Center.X-n div 2,window.Center.Y-n div 2,window.Center.X+n div 2,window.Center.Y+n div 2);
end;

procedure points(n:integer);
Var
 x,y,i:integer;
begin
i:=0;
while i<1000 do
 begin
  x:=random(window.Center.X-n div 2+1,window.Center.X+n div 2-1); 
y:=random(window.Center.Y-n div 2+1,window.Center.Y+n div 2-1);
  setpixel(x,y,rgb(random(255),random(255),random(255)));
  inc(i);
 end;
end;

begin
randomize;
square(n);
points(n);
end.

//1

 <script type="text/javascript">
   var ans=prompt('Name a vegetable that is green on the outside and  white on the inside. It starts with C.','answer');
   if(ans=='Cucumber')
         alert('Congratulations, answer is right!');
         else
        alert('Wrong answer');
   alert('Game over');
 </script>

//2
 <script type="text/javascript">
   var count=0;
   var ans=prompt('Name a vegetable that is green on the outside and  white on the inside. It starts with C.','answer');
   if(ans=='Cucumber')
         count=count+1;
   ans=prompt('Name a tiny, round green vegetable that grows in pods. It starts with P. Children like it.','answer');
   if(ans=='Peas')
         count=count+1;
   ans=prompt('What goes up when the rain comes down?','answer');
   if(ans=='Umbrella')
         count=count+1;
   ans=prompt('I am purple, yellow, red,/and green./The King cannot reach me and neither can the Queen./I show my colours after the rain,/And only when the sun comes out again.','answer');
   if(ans=='Rainbow')
         count=count+1;
   alert('Count of right answers:'+count);
   alert('Game over');
 </script>