В программе используется одномерный целочисленный массив A с индексами от 0 до 9. Значения элементов равны 15; 3; 24; 13; 2; 13; 25; 23; 21; 11 соответственно, т.е. A[0] = 15; A[1] = 3 и т. д. Определите значение переменной k после выполнения следующего фрагмента программы:
|
Паскаль |
Си |
k := 0;
for i := 0 to 9 do begin
m := A[i] mod 10;
if A[i] >= A[m] then begin
k := k + 1;
A[m] := A[i]
end
end;
|
k = 0;
for (i=0; i<=9; i++) {
m = A[i] % 10;
if (A[i] >= A[m]) {
k = k + 1;
A[m] = A[i];
}
}
|