while(fabs((stk[nxt]-stk[i])%(stk[nxt]-stk[i+1]))>fabs((stk[r]-stk[i])%(stk[r]-stk[i+1])))r=nxt,nxt=r%top+1;

中间那个符号到底取不取等啊