168이 맞습니다.

소스를 올려주시면 답변드리겠습니다. (아래 소스와 확인해 보세요.)

Option Explicit

Sub main()

    ''필수 변수 선언
    Dim 인수1, 인수2, K, 버퍼 As Variant
   
    ''핵심 변수 선언
    Dim 담임코드, 영어점수, 수학점수, 최대값 As Variant
   
    ''인수 처리
    인수1 = Val(Left(Command, InStr(Command, " ")))
    인수2 = Val(Mid(Command, InStr(Command, " ")))
   
    ''입력 파일 처리
    Open "c:\c_it\data\abc1115.txt" For Input As #1
   
        ''최대값 초기화
        최대값 = 0
       
        For K = 1 To 인수2
            Line Input #1, 버퍼
            If K >= 인수1 Then
           
                ''변수 저장
                담임코드 = Trim(Mid(버퍼, 29, 1))
                영어점수 = Val(Mid(버퍼, 14, 3))
                수학점수 = Val(Mid(버퍼, 17, 3))
               
                ''최대값 구하기
                If 담임코드 = "A" Or 담임코드 = "C" Then
                    If 최대값 < 영어점수 + 수학점수 Then
                        최대값 = 영어점수 + 수학점수
                    End If
                End If
               
            End If
        Next K
               
    Close #1
   
    ''출력 파일 처리
    Open "c:\c_it\data\ans2.txt" For Output As #2
       
        Print #2, 인수1, 인수2, 최대값
       
    Close #2
   
End Sub