Пользователь вводит предложение,определить каких букв в предложении больше:"а" или "о" ?...

Question

Пользователь вводит предложение,определить каких букв в предложении больше:"а" или "о" ?
Написать программу в Pascal

Comments

Всмысле?

---

Что то я не понял?

Answer 1

Begin
  var s := readstring();
  if (s.Where(x -> x = 'а').Count > s.Where(x -> x = 'о').Count) 
  then write('Букв "а" больше')
  else write('Букв "о" больше');
end.