Вопрос В программе описан одномерный целочисленный массив

[hillme]

В про­грам­ме опи­сан од­но­мер­ный це­ло­чис­лен­ный мас­сив с ин­дек­са­ми от 0 до 10 и це­ло­чис­лен­ные пе­ре­мен­ные k, i. В при­ве­ден­ном ниже фраг­мен­те про­грам­мы мас­сив сна­ча­ла за­пол­ня­ет­ся, а потом из­ме­ня­ет­ся:
for i : = 0 to 10 do
A : = i;
for i : = 10 downto 0 do begin
k : = A[10-i];
A[10-i] : = A;
A : = k;
end;
Чему будут равны эле­мен­ты этого мас­си­ва?
У меня получается 0 1 2 3 4 5 4 3 2 1 0, но должно быть 0 1 2 3 4 5 6 7 8 9 10. Что я делаю не так?

 

[Sinner]

В каком смысле "получается"? Запустил программу и так вот получилось? Не может быть. Этот код переворачивает массив, причем дважды. Получается исходный массив.

 

[veruteriv]

Что-то ты не так делаешь... program xxx; var i, k: Integer; a: array [0..10] of Integer; begin for i := 0 to 10 do A := i; for i := 0 to 10 do write(a, ); writeln; for i := 10 downto 0 do begin k := A[10 - i]; A[10 - i] := A; A := k; end; for i := 0 to 10 do write(a, ); writeln; readln end. Вывод://otvet.imgsmail.ru/download/24751000_242e63cf032c894cdd1229ec0570606c_800.png