Регистрация
Войти
Стать экспертом Правила
Информатика

Всем привет,ребят будьте добры Пожалуйста посчитайте с заданием.Задание звучит так:Дана строка.Определить,больше в строке букв или других символов.

ОТВЕТЫ



begin
  var s:=ReadlnString('Введите строку:');
  var n:=s.Matches('[A-Za-zА-Яа-яёЁ]').Count;
  var m:=s.Length-n;
  if m>n then Writeln('В строке букв меньше иных символов')
  else
    if m<n then Writeln('В строке букв больше иных символов')
    else Writeln('В строке поровну букв и иных символов')
end.


Введите строку: Это 12+32/16t/7+3.1415 тест
В строке букв меньше иных символов

Введите строку: И это 14+7 равно 21 тоже тест
В строке букв больше иных символов
592
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам