Множества! помогите плз. срочно надо.

Даны множества М1:= [0..4,9..12]; M2:= [1..7]. Определить результат операции пересечения этих множеств:

[2,3,4]
[1,2,3,4,5,6]
[9,10,11,12]
[0,4,5,7]
[0,2,5,7]
3 Даны множества М1:= [2..5,8..10]; M2:= [3..7]. Определить результат операции объединения этих множеств:

[2,3,4,5,6,7]
[3,4,5,6,7]
[8,9,10]
[2,3,4,5]
[2,3,4,5,6,7,8,9,10]
4 Даны множества М1:= [2..5,8..10]; M2:= [0..8]. Определить результат операции разности этих множеств:

[0,1,2,3,4,5]
[2,3,4,5]
[9,10]
[0,8]
[0,5]
5 Укажите процедуру, которая закрывает текстовый файл, если он перед этим был открыт, затем вновь его открывает для добавления информации в конец файла:

Writeln(F,S)
Rewrite (F)
Reset(F)
Append (F)
Readln(F)