Ошибка в программе: Нельзя преобразовать тип array [0..10] of real к array of real

program SimpsonIntegral_TabularedFunc_RegularGrid;
 
{ Вычисление интеграла }
function SimpsonIntegral (n: integer; a, b: real; y: array of real): real;
var sum : real;
    i   : integer;
    h   : real;
begin
  h   := (b - a)/n;
  sum := 0;
  i   := 0;
  while i < n do begin
    sum := sum + y[i] + 4*y[i+1] + y[i+2];
    i   := i + 2
  end;
  SimpsonIntegral := sum*h/3
end;
 
const { Количество отрезков интегрирования }
      N = 10;
      { Значения функции в узлах сетки }
      y : array [0..N] of real = (0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0);
      { Границы интервала }
      a : real = 0;
      b : real = 1;
 
begin
  WriteLn('Интеграл равен ', SimpsonIntegral(N, a, b, y))
end.

type mas=array of real;
function SimpsonIntegral (n: integer; a, b: real; y: mas): real;
var sum : real;
    i   : integer;
    h   : real;
begin
  h   := (b - a)/n;
  sum := 0;
  i   := 0;
  while i < n do begin
    sum := sum + y[i] + 4*y[i+1] + y[i+2];
    i   := i + 2
  end;
  SimpsonIntegral := sum*h/3
end;
 
const  N = 10;{ Количество отрезков интегрирования }
      { Значения функции в узлах сетки }
      y : mas = (0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0);
      { Границы интервала }
      a : real = 0;
      b : real = 1;
 
begin
  WriteLn('Интеграл равен ', SimpsonIntegral(N, a, b, y))
end.

      y : array of real = (0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0);