Var s: string;
n,k: integer;
begin
write('строка: '); readln(s);
k:=0;
n:=pos('abc',s);
if n>0 then
repeat
k:=k+1;
delete(s,1,n+2);
n:=pos('abc',s);
until n=0;
writeln(k);
end.
строка: fdrsabcde dsabcjhy abckjuy
3
строка: dscabgfre fhygdte
0
Точка старта робота должна находится в верхнем правом углу первый "звёздочки" (ну, третья клетка сверху, третья - слева)
<h2>Код</h2>
#include <iostream>
using namespace std;
int main()
{
setlocale(LC_ALL, "Russian"); // допускаем русский язык в консоли
string s = ":==:Example:=:=:="; // пример строки, в которой 4 символосочетания :=
unsigned int N = 0; // счётчик
for(int i = 0; i < s.length(); i++){ // lenght() подсчитывает количество символов в строке
if(s[i] == ':' && s[i+1] == '='){
N = N + 1;
}
}
cout << "':=' Встречается " << N << " раз.";
return 0;
}
<h2>Проверка</h2>
':=' Встречается 4 раз.
13:2=6остаток 1 6:2=3 остаток 0 3:2=1 остаток 1 ответ 13/2=11031
Как была так и выглядит :D