Ну построй дерево вопросов/ответов.
Код:
type
PQuestionRec = ^TQuestionRec;
TQuestionRec = record
UID : Integer;
Question : String;
Answer1Text : String;
Answer1Link : PQuestionRec;
Answer2Text : String;
Answer2Link : PQuestionRec;
end;
Соответственно, когда построишь дерево (UID для этого используется, что бы в коде не писать, а грузить из файла, см чуть ниже), то просто перебираешь по получившемуся дереву.
Теперь по поводу загрузки.
Создаем файл, текстовый например, из него в список читаем все вопросы. В другом файле (можно и в том же) располагаем линки (вот тут UID'ы и пригодяться), читаем их и строим дерево.
Ну вот как-то так.