10个回答
展开全部
i:=1;var i:integer;
sum:double;
begin
i:=1;
sum:=1.0 / 3.0;
while i <2002 do
begin
sum:=sum+i /(i+2.0);
inc(i,2);
end;
showmessage(Floattostr(sum));
end;
sum:double;
begin
i:=1;
sum:=1.0 / 3.0;
while i <2002 do
begin
sum:=sum+i /(i+2.0);
inc(i,2);
end;
showmessage(Floattostr(sum));
end;
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
会用VB就用一楼的程序算,好像是没有简便算法的。2000是错的吧~~~!
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
3(×)3(÷)3(÷)3=1
【3(×)3(-)3】(÷)3=2
【3(+)3(+)3】(÷)3=3
【
3(×)3(+)3】(÷)3=4
【3(+)3】(÷)3(+)3=5
【3(+)3(×)3】(÷)3=6
3(÷)3(+)3(+)3=7
3(×)3(-)3(÷)3=8
【3(×)3(-)3】(÷)3=2
【3(+)3(+)3】(÷)3=3
【
3(×)3(+)3】(÷)3=4
【3(+)3】(÷)3(+)3=5
【3(+)3(×)3】(÷)3=6
3(÷)3(+)3(+)3=7
3(×)3(-)3(÷)3=8
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
3÷3+3-3=1
3÷3+3÷3=2
3×3-3-3=3
3-3+3+3=6
3+3+3÷3=7
3×3-3÷3=8
3÷3+3÷3=2
3×3-3-3=3
3-3+3+3=6
3+3+3÷3=7
3×3-3÷3=8
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询