Задание
A
s := s + 1
end
end;
Представленный ниже на языке Паскаль фрагмент программы обрабатывает элементы одномерного целочисленного массива A с индексами от 0 до 9. Перед началом выполнения данного фрагмента эти элементы массива имели значения 2, 4, 3, 6, 6, 6, 6, 1, 3, 2 \(т\. е\. A⟨0⟩ = 2, A⟨1⟩ = 4, …, A⟨2⟩ = 2\). Определите значение переменной s после выполнения фрагмента.
s := 0;
for i:=1 to 9 do begin
if A
\[i\-1\]
< A\[i\]
then beginA
\[i\]
:= A\[i\-1\]
+ 1;s := s + 1
end
end;
- 2
- 3
- 4
- 5
- 6
- 7
- 8