Задание 6 Параграф 8 ГДЗ Босова 11 класс (Информатика)

Ниже вариант решения задания из учебника Босова, Босова 11 класс, Бином:

6. Имеется одномерный целочисленный массив из семи элементов.

Каким будет результат преобразования массива но следующему алгоритму?

В тексте задания, скорее всего, ошибка. Переменная к никак не определена. По смыслу, скорее всего, предполагался сдвиг элементов массива и должно быть

for i := 2 to n do

a[i - 1] := a[i];

const n=7;

var

a: array [1..n] of integer;

k,i: integer;

begin

for i := 1 to n do

read(a[i]);

k:=a[1];

for i := 2 to n do

a[i - 1] := a[i];

a[n]:=k;

for i := 1 to n do

write(a[i])

end.

Программа: Z_8_6.pas (ссылка ниже)