• Дано натуральное число n и целочисленный массив A(n). Найти количество
    различных чисел в этом массиве, вывести также сами эти числа.
    Например, в массиве, состоящем из элементов
    [5,7,5] различных чисел два (5 и 7).}
    Программа в PascalABC.Net

Ответы 1

  • // PascalABC.NET 3.2, сборка 1325 от 19.10.2016begin  var A:=ArrRandom(ReadInteger('n='),-5,5); a.Println;  a.Distinct.Print;  Writeln(' : ',A.Distinct.Count,' разных чисел')end.Примерn= 134 -2 5 -5 -5 1 -2 5 -4 -2 -2 -4 -14 -2 5 -5 1 -4 -1 : 7 разных чисел
    • Автор:

      shamar
    • 6 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years