‹上一楼：var
a:array[1..1000] of integer;
i,n:integer;
procedure max(j:integer);
b ..(xyj)

--> 查看全部回帖(2)