Нужно посчитать все числа которые встречаются в тексте пример а1s5df11g12 ответ 4

#include < iostream> using namespace std; int main() {     setlocale (lc_all,"russian");     int number;     do     {         cout < < "введите номер группы: ";         cin > > number;     }     while (number< 100 || number> 999);     char *groups[9]={"","","юридический",                               "","","",                               "биологический","",""};     cout < < groups[number/100-1] < < ", поступил в 200" < < number/10%10             < < " году\n";     return 0; } как понял, так и написал

Var   a: array[1..40] of integer;   i,n,k3,k,s,a3: integer; begin   write('n='); read(n);   for i: =1 to n do read(a[i]);   k3: =0; {a}   s: =0; k: =0; {b}   a3: =-1000; {c}   for i: =1 to n do begin       if a[i] mod 10=3 then inc(k); {a}       if (a[i]> 0) and (a[i] mod a[1]=0) then begin {b}           s: =s+a[i]; inc(k)           end;       if (a[i]< 0) and (a[i]> a3) and (a[i] mod 3=0) then a3: =a[i]; {c}       end;   writeln('кол-во чисел. оканчивающихся на 3: ',k3); {a}   writeln('среднее арифметическое по условию: ',s/k: 0: 3); {b}   if a3< > 1000 then writeln('наибольший отрицательный, кратный 3: ',a3) {c}   else writeln('нет отрицательных элементов, кратных 3') end. для решения конкретного пункта выбирать только операторы, помеченные этим пунктом, например, {a} для а)