Question

Написать программу,
которая определит, каких знаков препинания в тексте больше — точек или
запятых. На паскале

Answer 1

## // PascalABC.NET 3.9

var текст := ReadString;

var запятых := текст.CountOf(',');

var точек   := текст.CountOf('.');

if запятых > точек then Print('Запятых больше')

else if запятых = точек then Print('Запятых и точек поровну')

else Print('Точек больше')