超级书架（问题描述】
farmerjohn最近为奶牛们的图书馆添置了一个巨大的书架，尽管它是如此的大，但他还是几乎瞬间就被各种各样的书塞满了。现在，只有书架的顶上还留有一点空间。
所有n（1<=n<=20000）头奶牛都有一个确定的身高h_i（1<=h_i<=10000）。设所有的奶牛身高的和为s。书架的高度为b，并且保证1<=b<=s<2000000007。
为了能够到比最高的那头奶牛还要高的书架顶，奶牛们不得不像演杂技一般，一头站在另一头的背上，叠成一座“奶牛塔”。当然，这个塔的高度，就是塔中所有奶牛的身高之和。为了往书架顶上放东西，所有奶牛的身高和必须不小于书架的高度。
显然，塔中的奶牛数目越多，整座塔就越不稳定，于是奶牛们希望在能够到书架顶的前提下，让塔中奶牛的数目尽量少。
现在，奶牛们找到了你，希望你帮她们计算这个最小的数目。保证奶牛塔能达到书架顶部。【输入】
第1行：2个用空格隔开的整数：n和b第2..n+1行：第i+1行是一个整数：h_i【输出】
第1行：输出一个整数，即最少要多少头奶牛叠成塔，才能够到书架顶部【输入输出样例】
样例说明】一共有6头奶牛，书架高度为40，奶牛们的身高在6..19之间。一种只用3头奶牛就达到高度40的方法：
18+11+13。当然还有其他方法，在此不一一列出了。【数据范围限制】
60%的数据，满足n<=2000100%的数据，满足n<=3000【参考程序】programshelf;
varh_i:array[1..20000]oflongint;
i,j,n,b,s,m:longint;begin
assign(input,''assign(output,''reset(input);
rewrite(output);readln(n,b);
fori:=1tondoreadln(h_i[i]);fori:=1ton-1doforj:=i+1tondo
ifh_i[i]m:=h_i[i];h_i[i]:=h_i[j];h_i[j]:=m;end;s:=0;
fori:=1tondobegins:=s+h_i[i];
ifs>bthenbeginwriteln(i);break;end;end;
close(input);close(output);end.
2024年青岛市pascal试题初中组第二题
c 与j a 问题描述 在csdn论坛里，j a的爱好者和c 的爱好者经常能为这两种语言哪个更好争论上几个小时。j a的爱好者会说他们的程序更加整洁且不易出错。c 的爱好者则会嘲笑j a程序很慢且 很长。另一个j a和c 爱好者不能达成一致的争论点就是命令问题。在j a中一个多个单词构成的变量名应该...
2024年青岛市程序设计竞赛试题
2012年青岛市程序设计竞赛试题 小学组 说明 1 必须以题目中规定的文件名进行保存，并用ftp上传到指定文件夹中，ftp上传在试题最后。请选手没做完一道题及时上传一次，以确保因机器故障引起的文件丢失。2 比赛时间为 60分钟，试题100分。3 使用竞赛规定的文件格式输入 输出。第一题火柴盒 程序文...
2024年青岛市程序设计竞赛试题
2012年青岛市程序设计竞赛试题 小学组 说明 1 必须以题目中规定的文件名进行保存，并用ftp上传到指定文件夹中，ftp上传在试题最后。请选手没做完一道题及时上传一次，以确保因机器故障引起的文件丢失。2 比赛时间为 60分钟，试题100分。3 使用竞赛规定的文件格式输入 输出。第一题火柴盒 程序文...