pascal导弹拦截【题目描述】某国为了防御敌国的导弹袭击,发展出一种导弹拦截系统.但是这种导弹拦截系统有一个缺陷:虽然
来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/05/21 13:54:43
pascal导弹拦截
【题目描述】
某国为了防御敌国的导弹袭击,发展出一种导弹拦截系统.但是这种导弹拦截系统有一个缺陷:虽然它的第一发炮弹能够到达任意的高度,但是以后每一发炮弹都不能高于前一发的高度.某天,雷达捕捉到敌国的导弹来袭.由于该系统还在试用阶段,所以只有一套系统,因此有可能不能拦截所有的导弹.
输入导弹一次飞来的高度(雷达给出的高度不大于30000的正整数).计算这套系统最多能拦截多少导弹.
p245
【输入】
n颗依次飞来的导弹高度,导弹颗数m then
begin
m:=b[i];
k:=i;
end;
writeln(b[k]);
write(a[k]);
while k>0 do
begin
write(' ',a[k-1]);
k:=c[k];
end;
end.
这样做有什么错?
【题目描述】
某国为了防御敌国的导弹袭击,发展出一种导弹拦截系统.但是这种导弹拦截系统有一个缺陷:虽然它的第一发炮弹能够到达任意的高度,但是以后每一发炮弹都不能高于前一发的高度.某天,雷达捕捉到敌国的导弹来袭.由于该系统还在试用阶段,所以只有一套系统,因此有可能不能拦截所有的导弹.
输入导弹一次飞来的高度(雷达给出的高度不大于30000的正整数).计算这套系统最多能拦截多少导弹.
p245
【输入】
n颗依次飞来的导弹高度,导弹颗数m then
begin
m:=b[i];
k:=i;
end;
writeln(b[k]);
write(a[k]);
while k>0 do
begin
write(' ',a[k-1]);
k:=c[k];
end;
end.
这样做有什么错?
应该为
for i:=n downto 1
不这样的话,c[n]=0,
可以用WATCH,和F7监视数据的变化.
再问: 我做的答案是对的,但一个点都过不到
再答: write(a[k]); 这里要加一句 k:=c[k]; while k>0 do begin write(' ',a[k-1]); 这句因改为write(' ',a[k]); k:=c[k]; end; 再附一组你会出错的数据 input 1 2 4 5 7 8 9 6 3 10 output 3 7 6 3
for i:=n downto 1
不这样的话,c[n]=0,
可以用WATCH,和F7监视数据的变化.
再问: 我做的答案是对的,但一个点都过不到
再答: write(a[k]); 这里要加一句 k:=c[k]; while k>0 do begin write(' ',a[k-1]); 这句因改为write(' ',a[k]); k:=c[k]; end; 再附一组你会出错的数据 input 1 2 4 5 7 8 9 6 3 10 output 3 7 6 3
pascal拦截导弹问题的解题思路?
世界上最先进的导弹是什么?中国最厉害的导弹世界导弹排名做少?中国有反导弹拦截系统吗?
pascal 程序 拦截导弹 求代码
激光拦截导弹大家都知道光速是导弹速度的几万倍,假如从美国发射导弹袭击我们,我们用激光拦截是否有几万次的机会?
超级计算机运算速度快和导弹发射和拦截导弹有关系吗?
中国有导弹防御系统么?
2010年noip复赛第三题导弹拦截答案(Pascal语言)
中国有自己的导弹防御系统吗
核导弹有多厉害?美国拦截导弹的技术不是非常先进还怕人家有核导弹?
NOIP1999提高组第一题导弹拦截问题第二问标答的算法证明
巡航导弹、弹道导弹、拦截导弹和民用客机的飞行速度各是多少?
有两导弹发射装置同时向敌航母发射导弹,由于敌航母上反导弹系统的拦截,所发导弹的命中率分别为0.4和0.45.假设的航母被