SSL JudgeOnline 1082——导弹拦截
来源:互联网 发布:中日韩关系知乎 编辑:程序博客网 时间:2024/05/21 16:18
Description
某国为了防御敌国的导弹袭击,发展出一种导弹拦截系统。但是这种导弹拦截系统有一个缺陷:虽然它的第一发炮弹能够到达任意的高度,但是以后每一发炮弹都不能高于前一发的高度。某天,雷达捕捉到敌国的导弹来袭。由于该系统还在试用阶段,所以只有一套系统,因此有可能不能拦截所有的导弹。
输入导弹依次飞来的高度(雷达给出的高度数据是不大于30000的正整数),计算这套系统最多能拦截多少导弹,如果要拦截所有导弹最少要配备多少套这种导弹拦截系统。
Sample Input
300 250 275 252 200 138 245
Sample Output
5(最多能拦截的导弹数)
2(要拦截所有导弹最少要配备的系统数)
首先我们可以用eoln来控制输入。
然后我们可以先弄能拦截的导弹数,判断这次寻找找到了最大值,就更新数据。
然后就根据上面的方法,求出要拦截所有导弹最少要配备的系统数。
代码如下:
var a,b,c,k:array[1..1000] of longint; n,i,j,max,min,high:longint;begin while not eoln do begin inc(n); read(a[n]); b[n]:=1; c[n]:=0; end; for i:=n-1 downto 1 do begin max:=0; for j:=i+1 to n do if (a[j]<=a[i]) and (b[j]>max) then max:=b[j]; b[i]:=max+1; end; max:=0; for i:=1 to n do if b[i]>max then max:=b[i]; writeln(max); min:=0; for i:=1 to n do begin if k[i]<>1 then begin k[i]:=1; high:=a[i]; for j:=i+1 to n do if (high>=a[j]) and (k[j]<>1) then begin high:=a[j]; k[j]:=1; end; inc(min); end; end; writeln(min);end.
0 0
- SSL JudgeOnline 1082——导弹拦截
- SSL JudgeOnline 2322——运输
- SSL JudgeOnline 1069——比赛安排
- SSL JudgeOnline 1030——麦森数
- SSL JudgeOnline 1868——谁是组长
- SSL JudgeOnline 2253——新型计算器
- SSL JudgeOnline 1456——骑士旅行
- SSL JudgeOnline 1194——最佳乘车
- SSL JudgeOnline 1786——麻将游戏
- SSL JudgeOnline 2244——国王的魔镜
- SSL JudgeOnline 1210——最佳浏览路线
- SSL JudgeOnline 1015——一元三次方程求解
- SSL JudgeOnline 1296——x^n次幂
- SSL JudgeOnline 1089——USACO 1.2 方块转换
- SSL JudgeOnline 1668——小车载人问题
- SSL JudgeOnline 1099——USACO 1.4 母亲的牛奶
- SSL JudgeOnline 1198——求逆序对数
- SSL JudgeOnline 1455——电子老鼠闯迷宫
- 牛客---特殊排序
- Spring @Configuration用annotation装配spring
- spring3+struts2+mybatis3框架整合
- 求有向网中任意一对顶点之间的最短路径 Floyd算法
- 巴斯光年探险阿里聚安全攻防挑战赛!决战12月28日!
- SSL JudgeOnline 1082——导弹拦截
- 点击现实与隐藏,点击其它地方隐藏刚显示的元素
- uboot配置文件mkconfig详解
- JQuery easyui Datagrid 分页事件
- SpringBoot Helloworld 测试 Maven项目
- JAVA中正则表达式总结
- 如何分清太极拳中的虚实
- android修改包名修改报错的问题总结
- spring 中 applicationEvent的使用