80 в школе есть три одиннадцатых класса: 11а, 11б, 11в. каждый день случайно выбирается один из учеников параллели 11-х классов для выполнения обязанностей дежурного. количество информации, содержащиейся в сообщении: 1) "выбран ученик 11а класса" равно (1+log2 2) бит; 2) "выбран ученик 11б класса" равно (1+log2 3) бит. в 11а и в 11б классах учатся 10 школьников. определите количество учеников в 11в классе.

Пусть x, y, z - количество учеников в классах 11а, 11б, 11в соответственно.
Тогда вероятности выбрать дежурных из этих классов будут:
x / (x+y+z); y / (x+y+z);  z / (x+y+z); 
log(2)[1/(x/(x+y+z))] = 1+log(2)2 ⇒ log(2)[(x+y+z)/x] = log(2)4 ⇒ (x+y+z)/x = 4
log(2)[1/(y/(x+y+z))] = 1+log(2)3 ⇒ log(2)[(x+y+z)/y] = log(2)6 ⇒ (x+y+z)/y = 6
x+y = 10 ⇒ y = 10-x

(10+z)/x = 4 ⇒ 4x = 10+z
(10+z)/y = 6 ⇒ 6y = 10+z
6y = 4x ⇒ x = 6y/4 = 3y/2 = 3*(10-x)/2 ⇒ 5x = 30 ⇒ x = 6

4x = 10+z ⇒ z = 4x-10 = 4*6-10 = 14
ответ: 14

Современные версии программного обеспечения (и в том числе, для языка Паскаль) позволяют в короткие сроки создавать очень короткие, наглядные и эффективные решения.

// PascalABC.NET 3.1, сборка 1250 от 28.05.2016
begin
  var a:=ArrRandom(20,-99,99); a.Println;
  a.Where(x->x<0).Concat(a.Where(x->x>=0)).Println
end.

Тестовое решение
88 94 55 -38 43 -72 3 -26 -1 -23 84 93 40 -8 -25 77 4 39 -50 3
-38 -72 -26 -1 -23 -8 -25 -50 88 94 55 43 3 84 93 40 77 4 39 3

Замечание:
Если стоит задача получить именно массив, а потом его вывести, можно написать так:
// PascalABC.NET 3.1, сборка 1250 от 28.05.2016
begin
  var a:=ArrRandom(20,-99,99); a.Println;
  a:=a.Where(x->x<0).Concat(a.Where(x->x>=0)).ToArray;
  a.Println
end.

В 2сс:
27=16+8+2+1=2^4+2^3+2^1+2^0=1 1011  (2cc)
0,|27 * 2          
 0|54  *2          
 1|08  *2         
 0|16  *2        
 0|32  *2
 0|64 *2
 1|28 *2  
 0|56 *2
 1|12 *2
 0|24 *2
 0|48 *2
 0|96 *2
 1|92 *2
 1|84 *2
 1|68 *2
 1|36 *2
 0|72 *2
 1 |44 *2
 0|88 *2
 1|76 *2
 1|52
  +1
1|04                            (последний байт при приближении =1100)

27, 27 = 1 1011, 0100 0101 0001 1110  1100  (в2сс) ≈11011,01001
27,27 =   1 B     ,   4       5      1        E       B   =  1B,451EC (в 16сс)

27, 27 =  11 011, 010  001  010  111 (в 2сс) =33,21217 ( в 8сс)
                3    3,     2     1      2       7