讨论 / 此题巨水....
oopp1300 2010-10-20 03:54:00
点我顶贴 收藏 删除
read(a,b);

p:=0;

for c:=1 to a do

p:=p+a/c;

p:=p*b;

writeln(p:0:4);

...秒杀了- -

查看更多回复
提交回复