输入:整数数组:Values
输出:Result
Result := -9999999;
for I:=0 to high(Values) do begin
Result := Max(Result,Values[I]);
end;
流程图很简单,可以用AutoFlowchart生成