[1025]Noip 2010 Problem 2

背景 Background NOIP2010普及组复赛第二题

描述 Description 学校里有一个水房，水房里一共装有m 个龙头可供同学们打开水，每个龙头每秒钟的 供水量相等，均为1。 现在有n 名同学准备接水，他们的初始接水顺序已经确定。将这些同学按接水顺序从1 到n 编号，i 号同学的接水量为wi。接水开始时，1 到m 号同学各占一个水龙头，并同时打 开水龙头接水。当其中某名同学j 完成其接水量要求wj 后，下一名排队等候接水的同学k 马上接替j 同学的位置开始接水。这个换人的过程是瞬间完成的，且没有任何水的浪费。即 j 同学第x 秒结束时完成接水，则k 同学第x+1 秒立刻开始接水。若当前接水人数n’不足m， 则只有n’个龙头供水，其它m-n’个龙头关闭。 现在给出n 名同学的接水量，按照上述接水规则，问所有同学都接完水需要多少秒。

输入格式 InputFormat 第1 行2 个整数n 和m，用一个空格隔开，分别表示接水人数和龙头个数。 第2 行n 个整数w1、w2、……、wn，每两个整数之间用一个空格隔开，wi 表示i 号同 学的接水量。

输出格式 OutputFormat 输出只有一行，1 个整数，表示接水所需的总时间。

样例输入 SampleInput [复制数据] 【输入样例1】 5 3 4 4 1 2 1 【输入样例2】 8 4 23 71 87 32 70 93 80 76

样例输出 SampleOutput [复制数据] 输出样例1: 4 输出样例2: 163

数据范围和注释 Hint 【数据范围】 1 ≤ n ≤ 10000，1 ≤m≤ 100 且m≤ n； 1 ≤ wi ≤ 100。

时间限制 TimeLimitation 1s

来源 Source NOIP2010普及组复赛——NO.2

 算法：简单模拟

 1 Var n,m:integer;
 2     w,state:array[1..200000]of byte;
 3     i,j,ans,now:longint;
 4 function null:boolean;
 5 begin
 6   for i:=1 to m do if (state[i]<>0)then exit(false);
 7   exit(true);
 8 end;
 9 begin
10   readln(n,m);
11   for i:=1 to n do read(w[i]);
12   for i:=1 to m do state[i]:=w[i];
13   now:=m;
14   ans:=0;
15   while not null do
16   begin
17     inc(ans);
18     for j:=1 to m do
19     begin
20       if (state[j]<>0) then dec(state[j]);
21       if (state[j]=0) and (now<>n) then
22         begin
23           inc(now);
24           state[j]:=w[now];
25         end;
26     end;
27   end;
28   writeln(ans);
29 end.

 

转载于:https://www.cnblogs.com/shy-/archive/2012/10/25/2739960.html