Дан целочисленный массив размера n. найти количество различных элементов в данном массиве.

// PascalABC.NET 3.3, сборка 1634 от 14.02.2018

// Внимание! Если программа не работает, обновите версию!
begin

var n:=readinteger('n=');

var mas:=ArrRandom(n,-99,99); 

Writeln('количество различных элементов->',mas.Distinct.Count);

end.