Задание
Дан фрагмент программы, записанной на языке программирования Паскаль.
k := 0;
for i := 1 to 10 do
if a
writeln \('k=', k\);
Определите значение переменной k после выполнения фрагмента программы.
Дан массив: 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 после выполнения фрагмента программы.