помогите!! паскальvar m, k, i; integer;mas; array [1..10] of integer;beginmas[1]:=12;

Выведется 8
-------------------
1)
mas[1] = 12 12 lt; 0 - неверно amp; 12 lt; 10 - неверно
2)
mas[2] = -5 -5 lt; 0 i = 2 2 mod 2 = 0 - верно --gt; k=1
3)
mas[3] = -14 -14 lt; 0 i = 3 3 mod 2 = 0 - неверно amp; -14 lt; 10 - верно --gt; m=1
4)
mas[4] = 16 16 lt; 0 - ошибочно amp; 16 lt; 10 - ошибочно
5)
mas[5] = -10 -10 lt; 0 i = 5 5 mod 2 = 0 - неверно amp; -10 lt; 10 - правильно --gt; m=2
6)
mas[6] = -6 -6 lt; 0 i = 6 6 mod 2 = 0 - правильно --gt; k=2
7)
mas[7] = 8 8 lt; 0 - ошибочно amp; 8 lt; 10 - правильно --gt; m=3
8)
mas[8] = -10 -10 lt; 0 i = 8 8 mod 2 = 0 - правильно --gt; k=3
9)
mas[9] = -15 -15 lt; 0 i = 9 9 mod 2 = 0 - ошибочно amp; -15 lt; 10 - верно --gt;m=4
10)
mas[10] = -8 -8 lt; 0 i = 10 10 mod 2 = 0 - правильно --gt;k=4
k+m = 4 + 4 = 8