В программе используется одномерный целочисленный массив A с индексами от 1 до 10. Значения элементов равны 4, 3, 1, 8, 4, 7, 0, -9, 1, 5 соответственно, т. е. A[1] = 4, A[2] = 3, и т. д. Определите значения элементов массив В после выполнения следующего фрагмента программы:
begin
for i := 1 to 10 do
if В[i] mod 2 = 0 then
В[i]:= 2*i;
end;