搜搜考试网这道pascal编程题怎么求?
来源：学生作业帮 编辑：搜搜考试网作业帮 分类：综合作业 时间：2024/05/14 20:24:05
这道pascal编程题怎么求?
请分别用用For、While语句完成 （1）设某县2000年工业总产值为200亿元,如果该县预计平均年工业总产值增长率为4.5%,那么多少年后该县年工业总产值将超500亿元?
请分别用用For、While语句完成 （1）设某县2000年工业总产值为200亿元,如果该县预计平均年工业总产值增长率为4.5%,那么多少年后该县年工业总产值将超500亿元?
var i:integer; sum:double; begin sum:=200; for i=1 to 100 do begin sum:=sum + sum*i*0.045; if(sum>500)then begin writeln(inttostr(i) + '年后该县年工业总产值将超500亿元!'); break; end; end; end;