for i := 1 to 100 mod total do
v[i] := 100 div total + 1;
for i := 100 mod total + 1 to total do
v[i] := 100 div total;
v[i] := 100 div total + 1;
for i := 100 mod total + 1 to total do
v[i] := 100 div total;
抢了个8楼,吉利数字!
谢谢楼主!接分!
流到瓜洲古渡头,
与君同消万古愁...