Заполнить одномерный массив из 25 элементов числами 1, 6, 11, 16, 21, 26 - Pascal ABC

Формулировка задачи:

Только начали проходить массивы, препод толком не смог адекватно объяснить как это работает. Ребят помогите кому не сложно)

program ppz;
{Заполнить одномерный массив из 25 элементов числами 1, 6, 11, 16, 21, 26}
const n=25;
type odnomer=array[1..n] of integer;
var i,k:integer;
begin
  writeln('Вводи конечное значение');
  readln(k);
  
  for i:=1 to k do
  begin
  writeln('Вводи элемент');
  readln(odnomer[i]);
  end;
  
  for i:=1 to k do
  begin
  write(odnomer[i],' ');
  end;
end.

Решение задачи: «Заполнить одномерный массив из 25 элементов числами 1, 6, 11, 16, 21, 26»

Листинг программы

program ppz;
{Заполнить одномерный массив из 25 элементов числами 1, 6, 11, 16, 21, 26}
const n=25;
var a:array[1..n] of byte;
    i,k:integer;
begin
k:=1;
for i:=1 to n do
 begin
  a[i]:=k;
  write(a[i]:4);
  k:=k+5;
 end;
end.

Объяснение кода листинга программы

В данном коде происходит заполнение одномерного массива из 25 элементов числами 1, 6, 11, 16, 21, 26. Константа n определяет размер массива и равна 25. Переменная a представляет собой массив, который будет заполняться числами. Она имеет тип array[1..n] of byte, что означает, что массив будет содержать 25 элементов типа byte (однобитный байт). Переменные i и k используются для цикла, который будет проходить по всем элементам массива. Внутри цикла переменная k инициализируется значением 1. Затем происходит запись значения переменной k в элемент массива a[i]. После этого значение переменной k увеличивается на 5 (k:=k+5) и цикл продолжается. Таким образом, после выполнения данного кода, все 25 элементов массива будут содержать числа 1, 6, 11, 16, 21, 26 соответственно.