<h3>PascalABC.NET 3.4.2, сборка 1887 от 30.11.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
var s := ReadlnString;
s.MatchValues('[.,:;\-()!?"]').Count.Println; // №1
(s.MatchValues('\d').Count > 0).Println; // №2
(s.MatchValues('(.)\1').Count > 0).Println; // №3
end.
О<u>К</u>А
===================
Браузер - это программа позволяющая создать соединение между ПК и поставщиком интернет-услуг
9-с, 8- d,5-d,10-a....!!!!