Нужно создать программу Паскаль авс, где перед нами предстает выбор тестов.
например: тест по русс.яз
тест по математике
тест по литературе
тест по истории
тест по обществознанию

можете просто пару вопросов к каждому тесту там написать в каждом. я сама все напишу. 
мне нужно узнать как сделать этот выбор между тестами.
ЗАРАНЕЕ ВСЕХ БЛАГОДАРЮ.

program test;var q,a,wa,name:string;test:integer;beginwriteln('1)Rus.l. 2)Math 3)Hist');readln(test);if test=1 then beginСюда вопросы для первогоend elseif test=2 then beginсюда вопросы для 2end elseif test=3 thenbeginСюда вопросы для 3end;end.