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

Question

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

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

Answer 1

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