Она напоминает мне корни деревьев.
//PascalABC.Net 3.1.0.1200
begin
var a := ArrRandomInteger(100, 1, 100).toList;
Println(A);
a := a.Sorted.toList;
a := a.Pairwise().Where(x -> x.Item1 = x.Item2).Select(x -> x.Item1).toList;
a := a.Distinct.toList;
Println(A);
end.
Вижу только верхнюю строчку в 2 сс=101000101 в 10сс =325
X ∈ (-<span>∞; 5) U (8; 30)</span>