【模拟】陶陶摘苹果
2012-08-17 08:52
274 查看
题目:陶陶摘苹果 rqnoj12
题目描述
陶陶家的院子里有一棵苹果树,每到秋天树上就会结出10个苹果。苹果成熟的时候,陶陶就会跑去摘苹果。陶陶有个30厘米高的板凳,当她不能直接用手摘到苹果的时候,就会踩到板凳上再试试。现在已知10个苹果到地面的高度,以及陶陶把手伸直的时候能够达到的最大高度,请帮陶陶算一下她能够摘到的苹果的数目。假设她碰到苹果,苹果就会掉下来。
输入格式
输入包括两行数据。第一行包含10个100到200之间(包括100和200)的整数(以厘米为单位)分别表示10个苹果到地面的高度,两个相邻的整数之间用一个空格隔开。第二行只包括一个100到120之间(包含100和120)的整数(以厘米为单位),表示陶陶把手伸直的时候能够达到的最大高度。输出格式
输出包括一行,这一行只包含一个整数,表示陶陶能够摘到的苹果的数目。样例输入
100 200 150 140 129 134 167 198 200 111110
样例输出
5这道题是很简单的了,应该是除了A+B Problem之外最简单的一道了。
读入身高后直接加上板凳的30,然后一个循环判断,树高<=(身高+30)就+1,最后输出就ok
代码是Pascal的
program rqnoj12; procedure init; begin assign(input,'rqnoj12.in'); assign(output,'rqnoj12.out'); reset(input); rewrite(output); end; procedure outit; begin close(input); close(output); halt; end; procedure readdata; var i,x,num:longint; a:array[1..10] of longint; begin num:=0; for i:=1 to 10 do read(a[i]); read(x); inc(x,30); for i:=1 to 10 do if x>=a[i] then inc(num); writeln(num); end; procedure main; begin end; begin init; readdata; main; outit; end.
相关文章推荐
- 【模拟】洛谷 P1478 陶陶摘苹果(升级版)
- noip2005 陶陶摘苹果 (模拟)
- 【模拟】陶陶摘苹果
- 【jzoj5350】【NOIP2017提高A组模拟9.7】【陶陶摘苹果】【动态规划】
- JZOJ5350. 【NOIP2017提高A组模拟9.7】陶陶摘苹果
- 1144. 陶陶摘苹果
- 陶陶摘苹果2
- 算法提高 ADV-180 陶陶摘苹果2
- Viojs P1102 陶陶摘苹果
- 陶陶摘苹果
- 陶陶摘苹果
- 洛谷-陶陶摘苹果-数组
- 洛谷——P1046 陶陶摘苹果
- 陶陶摘苹果
- 常州模拟赛d4t2 陶陶摘苹果
- 陶陶摘苹果
- 陶陶摘苹果
- 洛谷 p1046 陶陶摘苹果
- 【题解】洛谷1478 陶陶摘苹果…
- 陶陶摘苹果