arrays - 如何找到数组中最小和最大的数字？

Question

您好，如何在delphi中找到最小和最大的数字？

假设我有 10 个不同的数字存储在一个数组中:

如何找到数组中最大的数字和最小的数字？

Answer 1

简单地以线性方式循环遍历数组。保留一个变量表示最小值，一个变量表示最大值。将两者初始化为数组中的第一个值。然后，对于每个元素，如果该元素分别小于或大于最小值或最大值，则更新最小值或最大值。

minval := a[0];
maxval := a[0];
for i := 1 to Count-1 do
begin
  if a[i]<minval then
    minval := a[i]
  else if a[i]>maxval then
    maxval := a[i];
end;

显然，这段代码假设 Count>0。

请注意，您同样可以使用数学单元中的 MinValue 和 MaxValue 例程。