Изменения

<font color = "green">// d - матрица как в описании; a - последовательность из n элементов; i, j, k - счётчики</font>

'''for ''' i := 1 '''to ''' n do: d[i][i] := a[i];

'''for ''' i := n - 1 '''downto ''' 1 do: '''for ''' j := i + 1 '''to ''' n do: '''for ''' k := i '''to ''' j - 1 do: d[i][j] := max(d[i][j], max(d[i][k] + d[k+1][j], d[i][k] * d[k+1][j]));

'''write'''(d[1][n]); <font color="green">// вывод ответа</font>