одновременый целочисленный массив из 15 элементов задан [0.200] .Найти минимальный элемент этого массива

мы такое проходили по моему это такbegin  var a := ArrRandom(15, 0, 200);  a.Println();  Writeln(a.Min())end. удачи

Program mass;constn=15;typemyarray = array [1..n] of integer;vara: myarray;i,y: byte;beginrandomize;y:=200;for i:=1 to n do begin    a[i]:=random (200);    write(a[i]:4);    if y>a[i] then y:=a[i];    end;writeln;writeln('min=',y);readln;end.