编译通过...

├ 测试数据 01：答案正确... 0ms

├ 测试数据 02：答案正确... 0ms

├ 测试数据 03：答案正确... 0ms

├ 测试数据 04：答案正确... 0ms

├ 测试数据 05：答案正确... 0ms

├ 测试数据 06：答案正确... 0ms

├ 测试数据 07：答案正确... 0ms

├ 测试数据 08：答案正确... 0ms

├ 测试数据 09：答案正确... 0ms

├ 测试数据 10：答案正确... 0ms

---|---|---|---|---|---|---|---|-

Accepted 有效得分：100 有效耗时：0ms

#include

using namespace std;

int main(void)

{

short n,m=0,k,tmp,count;

cin>>n>>k;

do{

count=0;

top:

cin>>tmp;

if(tmp)

{++count;goto top;}

else

if(count>=k) ++m;

}while(--n);

cout

发大水了

贪心中的洪水

编译通过...

├ 测试数据 01：答案正确... 0ms

├ 测试数据 02：答案正确... 0ms

├ 测试数据 03：答案正确... 0ms

├ 测试数据 04：答案正确... 0ms

├ 测试数据 05：答案正确... 0ms

├ 测试数据 06：答案正确... 0ms

├ 测试数据 07：答案正确... 0ms

├ 测试数据 08：答案正确... 0ms

├ 测试数据 09：答案正确... 0ms

├ 测试数据 10：答案正确... 0ms

---|---|---|---|---|---|---|---|-

Accepted 有效得分：100 有效耗时：0ms

啊 比较复杂……

踢人

var

ju:boolean;

n,i,t,k,c,g:integer;

s:string;

num:array[1..200]of integer;

d:array[1..200,1..200]of boolean;

procedure find(x:integer);

var i:integer;

begin

dec(n);

for i:=1 to n do

if d=true then

begin

d:=false;

d[x,i]:=false;

dec(num[i]);

end;

end;

begin

readln(n,g);

fillchar(num,sizeof(num),0);

fillchar(d,sizeof(d),false);

for i:=1 to n do

begin

readln(s);

k:=pos(' ',s);

val(copy(s,1,k-1),t,c);

while t0 do

begin

inc(num[i]);

d:=true;

delete(s,1,k);

k:=pos(' ',s);

if k=0 then k:=length(s)+1;

val(copy(s,1,k-1),t,c);

end;

end;

ju:=true;

for i:=1 to n do

begin

if num[i]

不过这比陶陶摘苹果难些哈……这个好像要用字符串……没告诉你每个人愿与几人交流，得自己分

var i,m,n,k,c,j:integer;

begin

m:=0;

for i:= 1 to n do

begin

read(j); c:=0;

while j 0 do

begin

inc(c);

read(j);

end;

if c >= k then inc(m);

readln;

end;

write(m);

end.

根本没读入（n,k）。

这样是50分，如果是

var i,m,n,k,c,j:integer;

begin

m:=0;

read(n,k);(注意这里）

for i:= 1 to n do

begin

read(j); c:=0;

while j 0 do

begin

inc(c);

read(j);

end;

if c >= k then inc(m);

readln;

end;

write(m);

end.

就是4组，无奈中

编译通过...

├ 测试数据 01：答案正确... 0ms

├ 测试数据 02：答案正确... 0ms

├ 测试数据 03：答案正确... 0ms

├ 测试数据 04：答案正确... 0ms

├ 测试数据 05：答案正确... 0ms

├ 测试数据 06：答案正确... 0ms

├ 测试数据 07：答案正确... 0ms

├ 测试数据 08：答案正确... 0ms

├ 测试数据 09：答案正确... 0ms

├ 测试数据 10：答案正确... 0ms

---|---|---|---|---|---|---|---|-

Accepted 有效得分：100 有效耗时：0ms

编译通过...

├ 测试数据 01：答案正确... 0ms

├ 测试数据 02：答案正确... 0ms

├ 测试数据 03：答案正确... 0ms

├ 测试数据 04：答案正确... 0ms

├ 测试数据 05：答案正确... 0ms

├ 测试数据 06：答案正确... 0ms

├ 测试数据 07：答案正确... 0ms

├ 测试数据 08：答案正确... 0ms

├ 测试数据 09：答案正确... 0ms

├ 测试数据 10：答案正确... 0ms

---|---|---|---|---|---|---|---|-

Accepted 有效得分：100 有效耗时：0ms

感谢楼下WANG大牛的题解！！太强了！

编译通过...

├ 测试数据 01：答案正确... 0ms

├ 测试数据 02：答案正确... 0ms

├ 测试数据 03：答案正确... 0ms

├ 测试数据 04：答案正确... 0ms

├ 测试数据 05：答案正确... 0ms

├ 测试数据 06：答案正确... 0ms

├ 测试数据 07：答案正确... 0ms

├ 测试数据 08：答案正确... 0ms

├ 测试数据 09：答案正确... 0ms

├ 测试数据 10：答案正确... 0ms

---|---|---|---|---|---|---|---|-

Accepted 有效得分：100 有效耗时：0ms

不要想太复杂。。如果某个节点的into>=k就inc一下sum

最后把sum输出就行。。。不到20行的程序

编译通过...

├ 测试数据 01：答案正确... 0ms

├ 测试数据 02：答案正确... 0ms

├ 测试数据 03：答案正确... 0ms

├ 测试数据 04：答案正确... 0ms

├ 测试数据 05：答案正确... 0ms

├ 测试数据 06：答案正确... 0ms

├ 测试数据 07：答案正确... 0ms

├ 测试数据 08：答案正确... 0ms

├ 测试数据 09：答案正确... 0ms

├ 测试数据 10：答案正确... 0ms

---|---|---|---|---|---|---|---|-

Accepted 有效得分：100 有效耗时：0ms

语文水平太高..本人经常语文不及格..好不容易才A.害我错3次

编译通过...

├ 测试数据 01：答案正确... 0ms

├ 测试数据 02：答案正确... 0ms

├ 测试数据 03：答案正确... 0ms

├ 测试数据 04：答案正确... 0ms

├ 测试数据 05：答案正确... 0ms

├ 测试数据 06：答案正确... 0ms

├ 测试数据 07：答案正确... 0ms

├ 测试数据 08：答案正确... 0ms

├ 测试数据 09：答案正确... 0ms

├ 测试数据 10：答案正确... 0ms

---|---|---|---|---|---|---|---|-

Accepted 有效得分：100 有效耗时：0ms

建议把这道题降为1颗星，和摘苹果那道放一起。

几乎是一样的程序的说。。。

贴个证书：

编译通过...

├ 测试数据 01：答案正确... 0ms

├ 测试数据 02：答案正确... 0ms

├ 测试数据 03：答案正确... 0ms

├ 测试数据 04：答案正确... 0ms

├ 测试数据 05：答案正确... 0ms

├ 测试数据 06：答案正确... 0ms

├ 测试数据 07：答案正确... 0ms

├ 测试数据 08：答案正确... 0ms

├ 测试数据 09：答案正确... 0ms

├ 测试数据 10：答案正确... 0ms

---|---|---|---|---|---|---|---|-

Accepted 有效得分：100 有效耗时：0ms

再来个核心片段，简单到无语。。。。。。怎么弄到难度2来了。。。

m:=0;

for i:= 1 to n do

begin

read(j); c:=0;

while j 0 do

begin

inc(c);

read(j);

end;

if c >= k then inc(m);

end;

题中说的是所找的k个人都属于m

郁闷竟然不用踢人法，害我才60分。

可以交流的人不一定要从那M个人中来！！！

其实不用那样麻烦，直接统计就OK了。n^2就可以过啦。。全是0ms。纪念舞会系列全部AC。。。。o(∩_∩)o...哈哈

感谢fjxmlhx教主的题解

这道题蛮有趣的。

题目就是让你在一个无向图中找一个点集，使每一个点都至少有K的度。

那么，此时算法就有点苗头了。

显然，在G中发出边

编译通过...

├ 测试数据 01：答案正确... 0ms

├ 测试数据 02：运行超时...

├ 测试数据 03：运行超时...

├ 测试数据 04：答案正确... 0ms

├ 测试数据 05：运行超时...

├ 测试数据 06：运行超时...

├ 测试数据 07：答案正确... 0ms

├ 测试数据 08：运行超时...

├ 测试数据 09：运行超时...

├ 测试数据 10：答案正确... 0ms

---|---|---|---|---|---|---|---|-

Unaccepted 有效得分：40 有效耗时：0ms

只是改了一个语句而已,多么有趣的结果~!

编译通过...

├ 测试数据 01：运行超时...

├ 测试数据 02：答案错误...程序输出比正确答案长

├ 测试数据 03：答案错误...程序输出比正确答案长

├ 测试数据 04：运行超时...

├ 测试数据 05：答案错误...程序输出比正确答案长

├ 测试数据 06：答案错误...程序输出比正确答案长

├ 测试数据 07：运行超时...

├ 测试数据 08：答案错误...程序输出比正确答案长

├ 测试数据 09：答案正确... 0ms

├ 测试数据 10：运行超时...

---|---|---|---|---|---|---|---|-

Unaccepted 有效得分：10 有效耗时：0ms

正好相反……orz……

事实证明,只要 淘淘摘苹果 就够了

想复杂?活该!