На вход сведения о сдаче экзаменов учениками некоторого класса.
в первой строке сообщается кол-во учеников n, каждая из следующих строк имеет формат:

, где
- не более 20 символов
- не более 15 символов
- через пробел три числа по системе
пример: иванов петр 4 5 3

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

Program Massivi;
var
i: Byte;
c: array [1..10] of Integer;
a, b: array [1..5] of Integer;
begin
// Zapolnee massiva c:
for i:=1 to 10 do
begin
//
Wtire('C['+IntToStr(i)+']=');
ReadLn(C[i]);
end;

// Formirovanie massivov a i b.
for i:=1 to 10 do
//
if i mod 2 = 0 then a[i div 2]:=c[i] else b[i div 2 + 1]:=c[i];

//
Write('Massiv a: ');
//
for i:=1 to 5 do Write(IntToStr(a[i])+', ');
//
WriteLn('');

//
Write('Massiv b: ');
//
for i:=1 to 5 do Write(IntToStr(b[i])+', ');
//
WriteLn('');

//
Write('Massiv c: ');
//
for i:=1 to 10 do Write(IntToStr(c[i])+', ');
end.

1. Записать двоичное число так, чтобы над ним сверху было место.
2. Над каждой двоичной цифрой (нулем или единицей) записать справа налево числа, начиная с единицы, при этом каждая последующая цифра должна равняться удвоенной предыдущей, т.е. цифры будут 1, 2, 4, 8, 16, 32, 64, ...
3. Сложить между собой те написанные числа, под которыми окажутся единицы из двоичной записи числа.
4. Полученная сумма - эквивалент двоичного числа в десятичной системе счисления.

Пример:

64 32 16 8 4 2 1
1    0  1  0 1 1 0
Складываем: 64+16+4+2=86.
1010110(2)=86(10)