当前位置:首页  综合

综合

陶陶摘苹果进阶版(陶陶摘苹果)

2024-06-16 00:01:08
导读 大家好,小东方来为大家解答以上的问题。陶陶摘苹果进阶版,陶陶摘苹果这个很多人还不知道,现在让我们一起来看看吧!1、输入包括两行数据。2...

大家好,小东方来为大家解答以上的问题。陶陶摘苹果进阶版,陶陶摘苹果这个很多人还不知道,现在让我们一起来看看吧!

1、输入包括两行数据。

2、第一行包含10个100到200之间(包括100和200)的整数(以厘米为单位)分别表示10个苹果到地面的高度,两个相邻的整数之间用一个空格隔开。

3、第二行只包括一个100到120之间(包含100和120)的整数(以厘米为单位),表示陶陶把手伸直的时候能够达到的最大高度。

4、 【输出】 输入包括两行数据。

5、第一行包含10个100到200之间(包括100和200)的整数(以厘米为单位)分别表示10个苹果到地面的高度,两个相邻的整数之间用一个空格隔开。

6、第二行只包括一个100到120之间(包含100和120)的整数(以厘米为单位),表示陶陶把手伸直的时候能够达到的最大高度。

7、 【样例输入】 100 200 150 140 129 134 167 198 200 111 110 【样例输出】 5 参考程序】 var reads,for1,Hecan:integer; apple:array[1..10] of integer; begin for for1:=1 to 10 do read(apple[for1]); readln(reads); readln; for for1:=1 to 10 do if reads+30>=apple[for1] then inc(Hecan); writeln(Hecan); readln; end.。

本文到此分享完毕,希望对大家有所帮助。

免责声明:本文由用户上传,如有侵权请联系删除!