Question

В программе используется одномерный целочисленный массив A с индексами от 1 до 10. Значения элементов равны 121; 33; 44; 28; 63; 999; 53; 23; 3; 2 соответственно, т. е. A[1] = 121; A[2] = 33 и т. д. Что будет выведено на экран? k:=0;
For i:=1 to 10
if a[i] div 10 = a[i] mod 10 Then inc(k);
write (k);