Составить программу для решения следующей задачи: Дана последовательность символов,концом...

0 голосов
35 просмотров

Составить программу для решения следующей задачи: Дана последовательность символов,концом которой является точка.Подсчитать,сколько в этой последовательности букв аb?


Информатика (28 баллов) | 35 просмотров
0

Сочетания ab, или сколько букв a и букв b?

0

сочетания ab

Дано ответов: 2
0 голосов
Правильный ответ
// PascalABC.NET 3.2, сборка 1377 от 19.01.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var s:=ReadlnString('>').ToCharArray.TakeWhile(c->c<>'.');
  Writeln('"ab" встречается ',
      s.Pairwise.Where(c->c[0]+c[1]='ab').Count,' раз(а)');
end.

Пример
> Cabbage is available at all times in our Abbey. That is not bad!
"ab" встречается 2 раз(а)
(150k баллов)
0 голосов

#include
#include
using namespace std;
int main()
{
string a = "";
int k = 0;
getline(cin, a);
for(int i = 0; i < a.length() - 2; i++)
{
if(a[i] + a [i + 1] == "ab") k ++;
}
cout << k;<br>}

(50 баллов)