Массив R[1]=12, R[2]=3, R[3]=-5, R[4]= -6, R[5]=4, R[6]=9, R[7]=0, R[8]=8. Определите значение суммы после выполнения следующего фрагмента программы: sum:=0; for i:=1 to 7 do if r[i]5 sum:=sum+r[i]; writeln (sum);

1.	21
2.	29
3.	25