Помогите перевести с Pascal на C++

[Ваня Аксёнов]

var
     N: integer; {количество чисел}
     a: integer; {очередное число}
     n26, n13, n2: integer;
     k26: integer; {количество требуемых пар}
     i: integer;

begin
     readln(N);
     n26:=0; n13:=0; n2:=0;
     for i:=1 to N do begin
         readln(a);
         if a mod 26 = 0 then
             n26 := n26+1
        else if a mod 13 = 0 then
             n13 := n13 + 1
         else if a mod 2 = 0 then
             n2 := n2 + 1;
    end;
    k26 := n26*(n26-1) div 2 + n26*(N-n26) + n2*n13;
    writeln(k26)
end.

 

[Shelldy]

#include <iostream>

using namespace std;

int main(){
    int n, a, n26 = 0, n13 = 0, n2 = 0, k26;
    cin >> n;
    for (int i = 0; i < n; i++){
        cin >> a;
        if (a % 26 == 0)
            n26++;
        else if (a % 13 == 0)
            n13++;
        else if (a % 2 == 0)
            n2++;
    }
    cout << n26*(n26-1) / 2 + n26*(n-n26) + n2*n13;
    return 0;
}

Вроде так.

 

[Ваня Аксёнов]

спасибо большое)