что делает эта программа и где ошибка?

[Карась]

Если честно, то я непонимаю как можно править алгоритм программы незная, что она должна делать....
Можно придумать множество проверок, промежуточных выводов результата, сверок и прочево...

Вообщем я к тому, что не мучайте нас, а дословно напишите задание..

[дангер]

Карась, извини, что мучаю. но это действительно все условие, котрое сказано в теме поста. "следующая программа ... зацикливается, если отключена проверка выхода за массив. почему это происходит? как необходимо решать ее на самом деле?" Сформулируйте, какую задачу хотел решить учащийся этой программой .

у меня неправильный паскаль? Abort - выдает как неизвестный идентификатор.

[Карась]

Сообщение от дангер

у меня неправильный паскаль? Abort - выдает как неизвестный идентификатор.

А если вместо Abort написать Break?

[Yurk@]

у меня неправильный паскаль? Abort - выдает как неизвестный идентификатор.

Сорри! Просто я все это делаю на Делфи Незаметил ...
Карась, спс за поправку!

[дангер]

Yurk@ Карась. Спасибо за совместное творчество. Я решила остановиться на таком варианте

var a: array[1..10]of integer;
i: integer;
begin
for i :=1 to 10 do a[i]:=i;
For i := 1 to 10 do Write(a[i], ' ');
for i :=1 to 10 do
if i=10 then a[1]:=i else a[i+1]:=i;
Writeln;
For i := 1 to 10 do Write(a[i], ' ');
end.

можете мне объяснить кратко почему в задаче спрашивается про зацикливание если нет проверки выхода . Про проверку выхода я поняла - надо добавить.

вообще где данная программа может использоваться. Ну не может быть чтобы ее решали "просто так", для ума. Нафиг сдвигать массив?

[Stilet]

Такая программа может использоваться только в контрольных ибо она бессмысленна практически - только для изучения отдаленной схожести с действительно реальными задачами на практике (в жизни)

[B_N]

Закручивается она потому, что переменная i в стеке переписывается, когда из массива вылазим. Классический эксплойт.
----------------

Даже чуть поправлюсь, не только в стеке, как глобальная тоже. Про это и вопрос задачи.

[дангер]

спасибо stilet i B_N.