帮我编一道题目(Pascal语言)小球从100米高处自由落下,着地后有弹回高度的一半再落下.求弹20次时,小球弹过了多少米

来源:学生作业帮助网 编辑:作业帮 时间:2024/05/01 02:35:54
帮我编一道题目(Pascal语言)小球从100米高处自由落下,着地后有弹回高度的一半再落下.求弹20次时,小球弹过了多少米

帮我编一道题目(Pascal语言)小球从100米高处自由落下,着地后有弹回高度的一半再落下.求弹20次时,小球弹过了多少米
帮我编一道题目(Pascal语言)
小球从100米高处自由落下,着地后有弹回高度的一半再落下.求弹20次时,小球弹过了多少米

帮我编一道题目(Pascal语言)小球从100米高处自由落下,着地后有弹回高度的一半再落下.求弹20次时,小球弹过了多少米
var
x,ans:real;
t:integer;
begin
ans:=0;
x:=100.0;
for t:=1 to 20 do
begin
ans:=ans+x;
x:=x/2;
ans:=ans+x;
end;
writeln(ans);
end.
题目有歧义呢,弹20次是指第20次落地,还是指第20次落地后弹起到最高点,或是第21次落地不再弹起
现在这个代码是指第20次落地后弹起到最高点

帮我编一道题目(Pascal语言)小球从100米高处自由落下,着地后有弹回高度的一半再落下.求弹20次时,小球弹过了多少米 教我一道turbo pascal题目题目是从键盘输入一个整数X(X 不超过 10000),若X的各位数字之和为7的倍数,则打印YES',否则中打印NO用turbo pascal格式回答 哪位大虾可以帮我解释一道C语言的题目?我看不懂啊...给... 这样一道C语言的题目应该怎样做帮我弄一下啊#include /* userCode( 帮我编C语言,从键盘输入矩形的长和宽,计算矩形的周长和面积. pascal的蛇形矩阵,设有一个n*n的矩阵(0<n<50)用pascal语言怎么编? 急求TURBO PASCAL 急求关于TURBO PASCAL 一道要关于FOR的,另外两道一道是过程的,一道是函数的,题目可以自己编,但是要与化学有关的, 一道简单的free pascal题目,各位free pascal大师解答一下吧.求2~100中每个数的质因子,输出如下形式:2=23=34=2*2...99=3*3*11100=2*2*5*5请一定是自编,要用我这种水平去做.最好用for循环.并请写上每一步的 帮我编一道应用题.编一道联系实际的数学问题,使所列的方程是:4(50-x)+6x=240 做一道PASCAL题目输出2——n之间的所有素数(质数). 帮我算一道数学题目! 帮我解决这一道题目 能不能帮我解一道题目啊 一道poj上的题目求poj2253 的pascal程序 帮我编一道数学应用题联系实际,使列的方程为3X+4(45-X)=150. 作文题目叫(说快乐) 请大家帮我编个四百字左右的作文 解决了给赞! 翻译成Pascal语言:从11加到2009 微积分的题目,帮我做一道题目