(坐标统计)输入n个整点在平面上的坐标。对于每个点,可以控制所有位于它左下方的点(即x、y坐标都比它小),它可以控制的点的数目称为“战斗力”。依次输出每个点的战斗力,最后输出战斗力最高的点的编号(如果若干个点的战斗力并列最高,输出其中最大的编号)。
Const
SIZE= 100;
Var
X,y,f:array[1..SIZE] of integer;
N,i,j,max_f,ans: integer;
Begin readln(n);
For i:=1 to n do
Readln (x[i],y[i]]);
Max_f :=0;
For i:=1 to n do
Begin f[i]:= 0 ;
For j:= 1 to n do
Begin if(x[j]< x[i]) and ( y[j]<y[i] ) then
f[i]:=f[i]+1 ;
End;
If (i>1)and (f[i]>f[i-1]) then
Begin max_f:= f[i];
ans:=max_f ;
End;
End;
For i:= 1 to n do
Writeln(f[i]);
Writeln(ans);
End.