Как записать индекс числа - Pascal

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

В примере дан x с индексом i как его записать в паскале? желательно весь пример, чтобы наглядно увидеть как оно выглядит в целом уравнении

Выражение	x₁	h	Условие	Значение y
	1	1	x ≤ 11	703.9324

Решение задачи: «Как записать индекс числа»

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

var
    x: Byte;
    y: Real;
begin
    x := 1;
    y := 1;
    while (x <= 11) do
    begin
        y := y*Exp(Ln(Abs(1 - 5*Ln(x)))/3);
        Inc(x);
    end;
    WriteLn('y=', y:0:4);
end.

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

Создается переменная x типа Byte и переменная y типа Real.
Присваивается значение 1 переменной x.
Присваивается значение 1 переменной y.
Запускается цикл while с условием, что x должно быть менее или равно 11.
Внутри цикла переменной y присваивается значение y умноженное на результат выражения Exp(Ln(Abs(1 - 5*Ln(x)))/3).
После этого к переменной x прибавляется 1 (с помощью процедуры Inc(x)).
Когда значение x становится равным 12, цикл завершается.
Значение переменной y выводится на экран с точностью до 4 знаков после запятой.
Программа завершается.