Помогите пожалуйста решить в паскале. Ввести натуральное число и определить,какие цифры...

Question

Помогите пожалуйста решить в паскале. Ввести натуральное число и определить,какие цифры встречаются несколько раз.

Comments

765645656

---

Помогите пожалуйста

---

уммм

---

алгорит 1

---

алгоритм то 1

---

а интерфейс разный

---

флорис, рисуй блок схему и собирай сам)

---

Через while

---

Помогите

Answer 1

// PascalABC.NET 3.3, сборка 1549 от 17.10.2017
// Внимание! Если программа не работает, обновите версию!

begin
  ReadInteger.ToString.GroupBy(c->c).Select(c->(c.Key,c.Count)).
      Where(t->t[1]>1).Select(t->t[0]).Println(',')
end.

Пример
765645656
6,5

Comments

Слишком сложно для 7 класса