ある数に一番近い数を配列の中の数値から取り出したので調べてましたところ、
MinIntValue MinValue 関数を発見したのですが、使い方がわかりません。 これはどのように使えばいいのでしょうか? 
また一番近い数を取り出す良い方法がしってましたら教えてください。 現状はこんな感じなのです・・・。
procedure TForm1.Button1Click(Sender: TObject);
var
a : array [0..3]of Integer;
b : array [0..3]of Integer;
i,j,u,min : Integer;
begin
u := 30;
a[0] := 10;
a[1] := 33;
for i := Low(a) to high(a) do
begin
b[i] := a[i] - u ;
if b[i] < 0 then
begin
b[i] := b[i]*-1;
end;
end;
min := b[j];
for j := Low(b) to High(b) do
begin
if min > b[j] then
begin
min := b[j];
end;
end;
Memo1.Lines.Add(IntToStr(min));
end;