Уменя на паскале записано s: = s + a mod 10 . что из это будет выполнятся первым? s+a или a mod 10 ?

Операция a mod 10 будет выполнена первой, согласно таблице приоритетов операторов.

#include <iostream>
#include <iomanip>
using namespace std;

int main() {
    int n,k,m;
    cout<<"N = ";  cin>>n;
    cout<<endl;
    if (n%2!=0) {
       cout<<"недопустимое значение N: "<<n<<endl;
       return(1);
    }
    cout<<setw(12)<<"gooses"<<setw(10)<<"rabbits"<<endl;
    m=n/4;  k=(n-m*4)/2;
    while (m>=0)  {
       if (k>0) cout<<setw(10)<<k;
       else cout<<setw(10)<<"--";    
       if (m>0) cout<<setw(10)<<m;
       else cout<<setw(10)<<"--";
       cout<<endl;
       m--;  k+=2;
    }
    system("pause");
    return(0);
}

{на free работает!}
var
sur, sur1: string;
i, count, pz: byte;
begin
write ('Введите строку: ');
readln (sur);
  for i:=1 to length (sur) do
     if sur[i] = 'a' then inc (count);
writeln ('Длина строки : ', length(sur), ' символов; кол-во "а": ', count);
sur1:=sur;
      for i:=2 to length (sur) do
               if (sur[i] = 'b') and (sur[i-1] = 'o') then
                begin;
                delete (sur1, i-pz, 1);
                inc (pz);
                end;
write ('Удалено ', pz, ' "b"; Новая строка: ', sur1);
end.