Question

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

Answer 1

Ответ: 35

Объяснение:

Дан цикл для i от 0 до 8, который проходит по массиву A и смотрит: если элемент с индексом i больше последнего (с индексом 9), то переменную s увеличивают на элемент с индексом i, элемент с индексом i и элемент с индексом 8-i меняют местами.

• 5, 7, 2, 3, 4, 6, 5, 5, 6, 4      --- меняем, s=0+5=5
• 6, 7, 2, 3, 4, 6, 5, 5, 5, 4      --- меняем, с=5+7=12
• 6, 5, 2, 3, 4, 6, 5, 7, 5, 4      
• 6, 5, 2, 3, 4, 6, 5, 7, 5, 4      
• 6, 5, 2, 3, 4, 6, 5, 7, 5, 4      
• 6, 5, 2, 3, 4, 6, 5, 7, 5, 4      --- меняем, с=12+6=18
• 6, 5, 2, 6, 4, 3, 5, 7, 5, 4      --- меняем, с=18+5=23
• 6, 5, 5, 6, 4, 3, 2, 7, 5, 4      --- меняем, с=23+7=30
• 6, 7, 5, 6, 4, 3, 2, 5, 5, 4      --- меняем, с=30+5=35
• 5, 7, 5, 6, 4, 3, 2, 5, 6, 4

Итак, как мы видим, после выполнения данного фрагмента программы, переменная s будет равна 35.

Пример работы: