下一楼›：type arr=array[1..100] of 0..1;
var d,w:array[1..100] of integer;
n,c,i,t:longi ..(ntr)

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