Дано натуральное число n ,и последовательных целых чисел,каждое из которых лежит в диапазоне от 0 до 255.определить все числа из заданного интервала,которые не входят в последовательность от 0 до 255(паскаль.решить с использованием множества и рандома)

Var a,n,i:byte;
mn:set of byte;
begin
readln(n);
mn:=[];
writeln('Числа последовательности:');
for i:=1 to n do
 begin
 a:=random(256);
 write(a,' ');
 mn:=mn+[a];
 end;
writeln;
writeln('Числа, которые не входят в последовательность:');
for i:=0 to 255 do
 if not (i in mn) then write(i,' ');
writeln;
end.

Пример (для диапазона от 0 до 25):
Числа последовательности:
6 23 17 12 17 4 22 25 3 8
Числа, которые не входят в последовательность:
0 1 2 5 7 9 10 11 13 14 15 16 18 19 20 21 24