不是VIP会员,不能显示答案

题目解答

题目:
贪心的武松
【问题描述】
曾经因打虎而闻名的武松在x年后接到了景阳岗动物园的求助信,信上说:最近我们动物园逃跑了几只老虎,请您把它们抓回来,谢谢!!
武松接到信之后立刻上了山。正当他到半山腰时,突然跳出n只猛虎来。每只老虎都有一块虎牌,牌上写的是每一只虎最大拥有的体力,当武松与老虎pk时,若老虎的体力先用完,那么老虎over,否则武松over,求武松在over之前最多能干掉几只老虎?
(注:老虎是一只只上的)

【输入】
第一行两个数字 n(老虎的只数),m(武松的体力)。第二行n个数字,分别表示每只老虎的体力(每只虎的体力按从小到大排列)。

【输出】
一行,最多能干掉的老虎数。

【样例输入】
3 6
1 3 9
【样例输出】
2

请完善以下程序
program test05;
var
  n,m,i,num:integer;
  a:array[1..100] of integer;

begin
  fillchar(a,sizeof(a),0);
  read(n,m);
  for i:=1 to n do
    read( a[i] );
  num:=0; i:=1;
  while (m>0) and (  i<=n  ) do
   begin
     m:=m-a[i];
     if m>=0 then begin
       num:=num+1;
          inc(i)    ;
     end;
   end;
  write(  num  );
 end.
考点:
分析:
解答:
评论:
老师: