5 lines
190 B
ObjectPascal
5 lines
190 B
ObjectPascal
|
##
|
|||
|
|
var s := 'каракатица так и катится';
|
|||
|
|
// EachCount возвращает частотный словарь (элемент,количество)
|
|||
|
|
s.EachCount.Println
|