Question

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

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