Sub maIN()

    ''''''''필수 변수 선언
    Dim 인수1, 인수2, I, 버퍼 As Variant
   
    ''''''''핵심 변수 선언
    Dim 단가, 이익포인트, 거래포인트, 합계(1000), NUM, TEMP, J As Variant
   
    ''''''''인수 처리
    인수1 = Val(Left(Command, InStr(Command, " ")))
    인수2 = Val(Mid(Command, InStr(Command, " ")))
   
   
    ''''''''입력파일 처리
    Open "C:\C_IT\DATA\ABC0001.TXT" For Input As #1
        For I = 1 To 인수2
            Line Input #1, 버퍼
            If I >= 인수1 Then
           
            ''''''''변수 저장
            단가 = Val(Mid(버퍼, 12, 3))
            이익포인트 = Val(Mid(버퍼, 20, 3))
            거래포인트 = Val(Mid(버퍼, 27, 3))
             
            ''''''''합계
            If 단가 >= 50 Then
                NUM = NUM + 1
                합계(NUM) = 이익포인트 + 거래포인트
            End If
       
            End If
        Next I
       
        ''''''''정렬 알고리즘
        For I = 1 To NUM
            For J = 1 To NUM  <<<< i 로 해야죠..
            
            If 합계(I) < 합계(J) Then
                TEMP = 합계(1) <<<<이것두  i로해야되요
                합계(I) = 합계(J)
                합계(J) = TEMP
            End If
            Next J
        Next I
       
       
    Close #1
   
   
    ''''''''출력 파일 처리
    Open "C:\C_IT\DATA\ANS1.TXT" For Output As #2
        Print #2, 인수1, 인수2, 합계(5)
    Close #2
   
End Sub

483,587 을입력하면 99가나와야되는데

답이왜틀리까여?저는110이나옵니다..

강의랑 똑같이 코딩한건데 왜이래여?????????????