Написать программу которая может подсчитать количество различных чисел. паскаль. числа !

//PascalABC.Net 3.1 сборка 1200
begin
    var a := ArrRandomInteger(10, 0, 10);
    Println(a);
    writeln(a.Distinct().Count);
end.