В программе используется одномерный целочисленный массив A с индексами от 1 до 10. Значения элементов равны 4; 2; 5; 6; 7; 7; 7; 5; 5; 9соответственно, т.е. A[1] = 4; A[1] = 2 и т.д. Определите значение переменной c после выполнения следующего фрагмента программы, записанного ниже на языке программирования Паскаль.
c:= 0;
for i := 1 to 9 do
if A[i - 1]>= A[i] then
begin
t:= A[i];
A[i]:= A[i - 1];
A[i - 1]:= t;
c:= c + 1;
end;
c:= 0;
for i := 1 to 9 do
if A[i - 1]>= A[i] then
begin
t:= A[i];
A[i]:= A[i - 1];
A[i - 1]:= t;
c:= c + 1;
end;
More Questions From This User See All