Число 7867 закодировано числовой последовательностью 011011100110, причем коды четных и нечетных цифр в числе имеют различную длину. Каким будет зашифрованное по этому коду сообщение, содержащее минимальное число, составленное из этих цифр, причем каждая из цифр встречается по одному разу.
!число 678 не подходит!

var

  x : array [1..15] of integer;

  i : integer;

  min : integer;

  kol_nol : integer;

begin

  kol_nol : = 0;

  for i: =1 to 15 do

  begin

  write ("введите элемент массива: ");

readln(x[i]);

end;

min : = x[1];

for i : = 0 to 15 do

begin

  if (x[i] > 0) then

  begin

  if (x[i] < min) then

  begin

    min : = x[i];

  end;

  end;

  if (x[i] = 0) then

  begin

  inc(kol_nol);

  end;

writeln(min);

writeln(kol_nol);

end;

2.5 кбайт = 2560 -байт = 20480 бит

20480 : 2560  = 8

ответ: 8 минут.

вроде както так..

954-459=495                                      

в книге 1 верное

а 99 неверных решений

  в этой книге ровно 99-ть неверных утверждений.