• Помогите!PascalABC
    Дан массив. Выяснить, сколько чисел входит в последовательность по одному разу

Ответы 4

  • Можете решить на версии 2.2 сборки 765?
    • Автор:

      wade20
    • 6 лет назад
    • 0
  • Могу, но не стану. Во-первых, это громоздко, а во-вторых, надо было сразу версию указывать в вопросе. Я не стал бы возиться с второй версией, её авторы перестали поддерживать с 2007 года, т.е. уже 9 лет назад.
    • Автор:

      brie
    • 6 лет назад
    • 0
  • Работа со второй версией - это демонстрация того, как НЕ НАДО УЧИТЬ ПРОГРАММИРОВАНИЮ.
    • Автор:

      goon
    • 6 лет назад
    • 0
  • // PascalABC.NET 3.1, сборка 1230 от 27.04.2016begin  var a:=ArrRandom(ReadInteger('n='),1,20);  a.Println;  Writeln('Уникальных чисел - ',a.Distinct.Count)end.Тестовое решениеn= 2018 5 13 19 8 3 4 15 2 18 6 5 18 1 3 17 18 16 6 5Уникальных чисел - 13
    • Автор:

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

Войти через Google

или

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

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

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