<u>// PascalABC.NET 3.2, сборка 1353 от 27.11.2016</u>
<u>// Внимание! Если программа не работает, обновите версию!</u>
begin
var a:=ReadArrInteger('Вводите:',ReadInteger('n='));
Writeln('Различных элементов- ',a.Distinct.Count)
end.
<em>Пример</em>
n= 10
Вводите: 456 12 6432654 -35424 -323421341 0 6432654 634222 -234532 34
Различных элементов- 9
Сайт calculatori.ru там заголовок
<em><span>V= d*i*t*s, где t – длительность звучания файла, s – количество каналов звучания, V - объем звукового файла</span></em>
I=8 бит,
d=8 кГц,
t=1200*1024*8/( 8*8*1000)=153,6 секунд
7x+6y+24, 14x+12y+20 и <span>21x+18y+3 — у этих трёх уравнений соотношение коэффициентов при х и у = 7:6 (7:6, 14:2 и 21:18)</span>