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

Ответы на вопрос




i, c,t:integer;
A: array[0..9] of integer;
Begin
A[0]:=6;
A[1]:=7;
A[2]:=5;
A[3]:=8;
A[4]:=3;
A[5]:=2;
A[6]:=0;
A[7]:=1;
A[8]:=9;
A[9]:=4;
c:=0;
for i:= 0 to 9 do //ошибка либо в условии либо в коде
if A[i]<A[0]
then
Begin
c:=c + 1;
t:=A[i];
A[i]:= A[0];
A[0]:= t;
end;
writeln('c= ', c);
readln;
end.
Ответ: c=4



Значение переменной `c` после выполнения данного фрагмента программы будет равно 3.
Давайте разберемся, как это происходит. В начале программы переменная `c` инициализируется значением 0. Затем выполняется цикл `for` с переменной `i` от 1 до 9. Внутри цикла проверяется условие `A[i] < A[0]`. Если условие выполняется, то выполняется блок кода внутри оператора `begin`. В этом блоке кода значение переменной `c` увеличивается на 1, а затем значения переменных `t` и `A[i]` меняются местами с помощью временной переменной `t` и операции присваивания.
В нашем случае, массив `A` имеет следующие значения: [6, 7, 5, 8, 3, 2, 0, 1, 9, 4]. При выполнении фрагмента программы происходят следующие изменения:
- При `i = 1`, выполняется блок кода, так как `A[1] (7) < A[0] (6)`. Значение `c` увеличивается на 1, `t` становится равным 7, `A[1]` становится равным 6, а `A[0]` становится равным 7. - При `i = 2`, блок кода не выполняется, так как `A[2] (5)` не меньше `A[0] (7)`. - При `i = 3`, выполняется блок кода, так как `A[3] (8) < A[0] (7)`. Значение `c` увеличивается на 1, `t` становится равным 8, `A[3]` становится равным 7, а `A[0]` становится равным 8. - Этот процесс продолжается для оставшихся элементов массива.
В результате, после выполнения фрагмента программы, значение переменной `c` будет равно 3.
Источник: -


Топ вопросов за вчера в категории Информатика







Последние заданные вопросы в категории Информатика
-
Математика
-
Литература
-
Алгебра
-
Русский язык
-
Геометрия
-
Английский язык
-
Химия
-
Физика
-
Биология
-
Другие предметы
-
История
-
Обществознание
-
Окружающий мир
-
География
-
Українська мова
-
Информатика
-
Українська література
-
Қазақ тiлi
-
Экономика
-
Музыка
-
Право
-
Беларуская мова
-
Французский язык
-
Немецкий язык
-
МХК
-
ОБЖ
-
Психология
-
Физкультура и спорт
-
Астрономия
-
Кыргыз тили
-
Оʻzbek tili