陶陶摘苹果 ACC PASCAL
2016-12-03 08:28
267 查看
陶陶摘苹果
题目描述
陶陶家的院子里有一棵苹果树,每到秋天树上就会结出10个苹果。苹果成熟的时候,陶陶就会跑去摘苹果。陶陶有个30厘米高的板凳,当她不能直接用手摘到苹果的时候,就会踩到板凳上再试试。现在已知10个苹果到地面的高度,以及陶陶把手伸直的时候能够达到的最大高度,请帮陶陶算一下她能够摘到的苹果的数目。假设她碰到苹果,苹果就会掉下来。
输入输出格式
输入格式:输入文件apple.in包括两行数据。第一行包含10个100到200之间(包括100和200)的整数(以厘米为单位)分别表示10个苹果到地面的高度,两个相邻的整数之间用一个空格隔开。第二行只包括一个100到120之间(包含100和120)的整数(以厘米为单位),表示陶陶把手伸直的时候能够达到的最大高度。
输出格式:
输出文件apple.out包括一行,这一行只包含一个整数,表示陶陶能够摘到的苹果的数目。
输入输出样例
输入样例#1:100 200 150 140 129 134 167 198 200 111 110
输出样例#1:
5
说明
NOIP2005普及组第一题这道题有一个要注意的地方:
一摸苹果就掉。
程序如下:
var
n,i,s:longint;
a:array[1..10]of longint;
begin
for i:=1 to 10 do
read(a[i]);
readln(n);
n:=n+30;//凳子的高度
for i:=1 to 10 do
if n>=a[i] then inc(s);//统计
writeln(s);
end.
相关文章推荐
- P1046 陶陶摘苹果
- 洛谷P1478 陶陶摘苹果升级版
- JZOJ5350. 【NOIP2017提高A组模拟9.7】陶陶摘苹果
- 陶陶摘苹果(升级版)
- noip2005 陶陶摘苹果 (模拟)
- |洛谷|贪心|P1478 陶陶摘苹果(升级版)
- 图的m着色问题ACC PASCAL
- T1103 陶陶摘苹果(#Ⅰ- 5 - 1)
- 陶陶摘苹果
- 洛谷题解--陶陶摘苹果(升级)
- 1-6-02:陶陶摘苹果
- vijos P1102陶陶摘苹果
- 陶陶摘苹果v
- 小鱼的数字游戏的ACC程序和解释PASCAL。
- <noip>陶陶摘苹果
- 洛谷——P1046 陶陶摘苹果
- noip普及组2005 陶陶摘苹果
- 算法提高 ADV-176 陶陶摘苹果
- Bailian2719 陶陶摘苹果【序列处理】(POJ NOI0106-02, vijos P1102)
- 三连击打表题目ACC PASCAL