Даны натуральное число n, символы s1, . . sn заменив в ней: каждую из групп стоящих многоточием (т.е. тремя точками)

// PascalABC.NET 3.1, сборка 1218 от 12.04.2016
begin
  var s:=ReadlnString('>');
  Println(Regex.Replace(s,'(.)\1+','...'))
end.

Тестовое решение:
> *** 244800+10000=254800 тестовый пример
... 2...8...+1...=2548... тестовый пример ...