Работа с записями

[Namyola]

День добрый всем!)

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

Как записать список в типизированную константу и само условие придлежности?не пойму,помогите,пжлйста)

[casekey]

const nmax = 100500;
type stud = record
    fio: string[30];
    nzach: integer;
    ...
    end;

    grup = record
    id: string[30];
    list: array[1..nmax] of stud;
    stud_count: integer;
    end;

так? если данные отсортированы, то можно использовать бинарный поиск

[Namyola]

Допустим,вот записал константу:

Type  
  stud = array[1..5] Of string;  
const  
  Data:stud = ('Студент1','Студент2','Студент3','Студент4','Студент 5');

То дальше как производить поиск-запрос??