明解Ｃ言語 入門編 > 6. 関数 > 配列の受け渡し Delphi program Project1;{$APPTYPE CONSOLE}uses SysUtils;function max_of(vc:array of Integer): Integer; var i: Integer; begin result := vc[0]; for i := Low(vc) to High(vc) do if vc[i] > result th…