Программа тестов

[DimOn4Ik]

Помогите пожалуйста или объясните ) Мне нужно написать программу с тестами,но только чтоб тесты,т.е вопросы и ответы были в файлах ) как такое можно сделать?

[profi]

Нужно создать две программы. Одну для записи вопросов в файл, вторую для тестирования учащихся. Работаешь с примерно такой структурой:

Delphi:

type Test = record
vopros, variant_1, variant_2, variant_3:string;
otvet:integer;
end;

Делаешь массив таких структур, например на 10 вопросов:

mas:array[1..10] of Test;

И при ответе ученика сравниваеш, например

if RadioButton.ItemIndex = mas[i].otvet then inc(ocenka);

Если индекс радиобатона совпадает с номером варианта ответа то все ОК.

[DimOn4Ik]

ого)) это не так и легко ,как мне казалось