Q&A

  • 최대값과 최소값
100,200,300,300 중에 최대값과 최소값을 구하고 싶은데요!

간단한 함수가 정의되어 있나요?

만약에 없으면 하나하나 해 주어야 하는 노가다를 하야하거든요!

혹시 알고 계시면 가르쳐 주세요!! 부탁합니다..

1  COMMENTS
  • Profile
    여영식 2000.01.13 00:24
    기본적으로 델파이에서 지원해주는 함수는 Max 함수가 있지만 이것은 파라미터가 2개로

    제한되어있습니다. 따라서 다음과 같은 함수를 만들어 사용해야 하겠습니다. 반대로 최소

    값을 구하기 위해서는 이 함수의 부등호만 바꾸면 되겠습니다.



    function Highest(Values: array of Integer): Integer;

    var

    i: Integer;

    begin

    Result := Values[0];

    for i := 1 to High(Values) do

    begin

    if Result < Values[i] then

    Result := Values[i];

    end;

    end;



    호출할 때는 다음과 같이 합니다.

    Highest([100, 200, 300, 300]);



    믿거나 말거나...



    ---



    park wrote:

    > 100,200,300,300 중에 최대값과 최소값을 구하고 싶은데요!

    > 간단한 함수가 정의되어 있나요?

    > 만약에 없으면 하나하나 해 주어야 하는 노가다를 하야하거든요!

    > 혹시 알고 계시면 가르쳐 주세요!! 부탁합니다..