【采摘桃形李】 （3+3+3+3+3=15 分）
嵊州市金庭镇，为书圣王羲之晚年归隐之地，同时 也是一种叫“桃形李”水果的著名产区。每年7月底到 8月初，桃形李就成熟了。它从外表看似桃形，果皮深红色，并覆有白色果粉，果肉紫红，口感爽甜、脆嫩、可口，兼有桃李之风味，还有淡淡清香，味道极佳，因 此被誉为“江南名果” 。
桃形李成熟的季节，也是嵊州市金庭镇最为热闹的 时候，小镇集市上，乡村小路边上，果园边上，都是呦喝着卖李的果农，而通往小镇的各条公路上，车流量大增，都是从全国慕名前来采摘桃形李的“自驾游”旅客。
笑笑家果园里也种这种果树，每当成熟的时候，果 树上就会结出n个桃形李，笑笑就会帮父母采摘桃形李，然后到集市去卖。笑笑有个30厘米高的板凳，当她不能直接用手摘到桃形李的时候，就会踩到板凳上再试试。现在已知n个桃形李到地面的高度，以及笑笑站在地面上把手伸直的时候能够达到的最高高度，请帮忙算 算笑笑能够摘到的桃形李的数目。
输入文件：plun.in
包括三行的数据。第一行为 n(n<=100)，表示结有 n 个桃形李。第二行包含 n 个 100~200 之间（包括 100 和 200）的整数（以厘米为单位） ，分别表示 n 个桃形李 到地面的高度，两个相邻的整数之间用一个空格隔开。
第三只包括一个 100—120 之间（包含 100 和 120）的数（以厘米为单位），表示笑笑站在地面上把手伸直的时 候能够达到的最大高度。
输出文件：plum.out
只有一行，这一行包括一个整数，表示笑笑能够到的桃形李的数目。
样例输入：
10
100_200_150_140_129_134_167_198_200_111
110
样例输出：
5

Program test_2013_6; 
Var n,h,i,j,s:integer; 
a:array[1..100] of integer; 
begin 
j:=0; assing(input,’plun.in’); 
reset(input); 
assing(output,’ plum.out’); 
rewrite(output); 
readln( n ); 
for i:=1 to n do 
begin read(s); 
a[i]:=s ; 
end; 
readln; 
readln(h) 
for i:=1 to n do 
if h+30>=a[i] then inc(j) ;
writeln(  j  ); 
close(input); 
close(output);
end.