单选题 阅读下列FORTRANN77程序：
INTEGERB(4，5)
DATAB/11，20，15，1，9，12，18，2，6，8，
*10，3，22，15，21，3，17，9，35，4/
K＝S(B，4，5)
WRITE(*，*)K
END
FUNCTION S(A，M，N)
INTEGER A(M，N)，D，P
D0100L＝1，M
P＝A(L，1)
K＝1
DO10J＝1，N
IF(A(L，J).LT.P)THEN
P＝A(L，J)
K＝J
END IF
10CONTINUE
D＝A(1，K)
D020J＝1，M
IF(A(J，K).GT.D)D＝A(J，K)
20CONTINUE
IF(P.EQ.D)THEN
S＝P
G()TO200
正ND IF
100CONTINUE
200END
运行上述程序后，输出的K的值为( )。
(A) 1 (B) 10 (C) 35 (D) 3