
Laak
5 год назад
Пожалуйста посчитайте пожалуйста решить в паскале. Ввести натуральное число и определить,какие цифры встречаются неКак узнать сколько раз.
ОТВЕТЫ

Boris
Oct 24, 2020
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
144
Смежные вопросы: