Дан массив: a[1]=7, a[2]=3, a[3]=5, a[4]=0, a[5]=4, a[6]=1, a[7]=8, a[8]=8, a[9]=1, a[10]=2.
Дан фрагмент программы, записанной на языке программирования Паскаль.
k := 0;
for i := 1 to 10 do
if a[i] >= 5 then k := k+1;
writeln ('k=', k);
Определите значение переменной k после выполнения фрагмента программы.