Дается последовательность из n чисел. найдите количество - вопрос №8229529 от twinnyXD 01.11.2021 04:35

Question

Информатика: Дается последовательность из n чисел. найдите количество различных чисел. формат входных данных первая строка входного файла содержит целое число n (1 = n = 1000000). в следующей строке n целых чисел, каждое из которых меньше или равно 1000000. формат выходных данных выведите ответ к

twinnyXD · Answer

//Pascalvar a,n,c,i:longint;    MLP: array [1..1000000] of integer;begin  read(n);  for i:=1 to n do    begin    read(a);    if (MLP[a]=0) then c+=1;    MLP[a]:=1;    end;  write(c);end....