Какое значение будут иметь переменные s и p после исполненья операторов,

Какое значение будут иметь переменные s и p после исполнения операторов, если массив содержит последующие значения а(-15,-3,-4,-7,12,6,-8);
S:=0; p:=1;
For i:=1 to n do
If a[i] mod 2=0 then S:=s+1 else p:=p*a[i];