憤怒的小鳥(NOIP2016提高組Day2T3)

2021-07-24 21:59:03 字數 3718 閱讀 6656

【題目描述】

kiana最近沉迷於一款神奇的遊戲無法自拔。

簡單來說,這款遊戲是在乙個平面上進行的。

有一架彈弓位於(0,0)處,每次kiana可以用它向第一象限發射乙隻紅色的小鳥,小鳥們的飛行軌跡均為形如y=ax^2+bx的曲線,其中a,b是kiana指定的引數,且必須滿足a<0。

當小鳥落回地面(即x軸)時,它就會瞬間消失。

在遊戲的某個關卡裡,平面的第一象限中有n只綠色的小豬,其中第i只小豬所在的座標為(xi,yi)。

如果某只小鳥的飛行軌跡經過了(xi,yi),那麼第i只小豬就會被消滅掉,同時小鳥將會沿著原先的軌跡繼續飛行;

如果乙隻小鳥的飛行軌跡沒有經過(xi,yi),那麼這只小鳥飛行的全過程就不會對第i只小豬產生任何影響。

例如,若兩隻小豬分別位於(1,3)和(3,3),kiana可以選擇發射乙隻飛行軌跡為y=-x^2+4x的小鳥,這樣兩隻小豬就會被這只小鳥一起消滅。

而這個遊戲的目的,就是通過發射小鳥消滅所有的小豬。

這款神奇遊戲的每個關卡對kiana來說都很難,所以kiana還輸入了一些神秘的指令,使得自己能更輕鬆地完成這個遊戲。這些指令將在【輸入格式】中詳述。

假設這款遊戲一共有t個關卡,現在kiana想知道,對於每乙個關卡,至少需要發射多少只小鳥才能消滅所有的小豬。由於她不會算,所以希望由你告訴她。

【輸入格式】

第一行包含乙個正整數t,表示遊戲的關卡總數。

下面依次輸入這t個關卡的資訊。每個關卡第一行包含兩個非負整數n,m,分別表示該關卡中的小豬數量和kiana輸入的神秘指令型別。接下來的n行中,第i行包含兩個正實數(xi,yi),表示第i只小豬座標為(xi,yi)。資料保證同乙個關卡中不存在兩隻座標完全相同的小豬。

如果m=0,表示kiana輸入了乙個沒有任何作用的指令。

如果m=1,則這個關卡將會滿足:至多用

如果m=2,則這個關卡將會滿足:一定存在一種最優解,其中有乙隻小鳥消滅了至少

保證1<=n<=18,0<=m<=2,0< xi,yi<10,輸入中的實數均保留到小數點後兩位。

上文中,符號

【輸出格式】

對每個關卡依次輸出一行答案。

輸出的每一行包含乙個正整數,表示相應的關卡中,消滅所有小豬最少需要的小鳥數量。

【樣例輸入】

3 2 0

1.41 2.00

1.73 3.00

3 0

1.11 1.41

2.34 1.79

2.98 1.49

5 0

2.72 2.72

2.72 3.14

3.14 2.72

3.14 3.14

5.00 5.00

【輸出格式】

2 2

3 【分析】

因為n的範圍很小,所以直接暴搜即可。

其實這個m的用處並不大,頂多當成乙個剪枝。

type

ar=array[1..2]of real;

var t,i,j,n,m,ans,sh:longint;

s:array[1..18,1..18,1..2]of real;

x,y:array[1..18]of real;

bz:array[1..18]of boolean;

bzz:array[0..262144]of longint;

w:array[0..18]of longint;

function

pdd(x,y:real):boolean;//注意精度,如果誤差在1e-6以下完全可以認為是可行的

begin

if round(x*1000000)=round(y*1000000)then

exit(true);

exit(false);

end;

function

pd(x,y:ar):boolean;

begin

if pdd(x[1],y[1])and pdd(x[2],y[2])then

exit(true);exit(false);

end;

procedure

find

(xx,sum:longint);

//嘗試打死第xx只豬,當前共用了sum只小鳥

var i,j,ysh:longint;

yl:array[1..18]of boolean;

begin

if sum>=ans then

exit;

while (xx<=n)and(bz[xx]) do inc(xx);

if xx=n+1

then

begin ans:=sum;exit; end;

if xxthen

begin

sh:=sh+w[xx];

for i:=xx+1

to n do

ifnot bz[i]and(s[xx,i,1]<0) then

begin

yl:=bz;ysh:=sh;bz[i]:=true;sh:=sh+w[i];

for j:=i+1

to n do

ifnot bz[j]and(pd(s[xx,i],s[i,j]))then

begin bz[j]:=true;sh:=sh+w[j]; end;

if sum+1

then

begin bzz[sh]:=sum+1;find(xx+1,sum+1); end;

bz:=yl;sh:=ysh;

end;

sh:=sh-w[xx];

end;

sh:=sh+w[xx];

if sum+1

then

begin bzz[sh]:=sum+1;find(xx+1,sum+1); end;

sh:=sh-w[xx];

end;

function

suan

(x,y,x2,y2:real):ar;

begin

ifnot pdd(x2,x) then

begin

suan[1]:=(y2-y*x2/x)/(x2*x2-x*x2);

suan[2]:=(y-suan[1]*x*x)/x;

endelse

begin

suan[2]:=(x2-x*y2/y)/(y2*y2-y*y2);

suan[1]:=(x-suan[2]*y*y)/y;

end;

end;

begin

readln(t);

w[1]:=1;

for i:=2

to18

do w[i]:=w[i-1]*2;

for t:=1

to t do

begin

readln(n,m);

for i:=0to1

for i:=1

to n do

begin

readln(x[i],y[i]);

for j:=1

to i-1

do s[j,i]:=suan(x[j],y[j],x[i],y[i]);

end;

ans:=n+1;

sh:=0;

find(1,0);

writeln(ans);

end;

end.

NOIp2016提高組 憤怒的小鳥

題目大意 平面直角座標系的第一象限有n n 18 個點,你可以每次給出乙個形如y ax 2 bx的函式把經過這條函式的點消掉,問消掉所有的點至少要多少函式?思路 列舉每兩個點對,可以唯一確定一條函式,再列舉第三個點,判斷一下是否會經過這條函式。狀態壓縮一下記錄每條函式能消掉那些點。然後就是乙個簡單的...

NOIP 2016 憤怒的小鳥

題目描述 kiana最近沉迷於一款神奇的遊戲無法自拔。簡單來說,這款遊戲是在乙個平面上進行的。有一架彈弓位於 0,0 處,每次kiana可以用它向第一象限發射乙隻紅色的小鳥,小鳥們的飛行軌跡均為形如y ax 2 bx的曲線,其中a,b是kiana指定的引數,且必須滿足a 0。當小鳥落回地面 即x軸 ...

NOIP2016 憤怒的小鳥

時間限制 1 sec 記憶體限制 128 mb kiana最近沉迷於一款神奇的遊戲無法自拔。簡單來說,這款遊戲是在乙個平面上進行的。有一架彈弓位於 0,0 處,每次kiana可以用它向第一象限發射乙隻紅色的小鳥,小鳥們的飛行軌跡均為形如y ax 2 bx的曲線,其中a,b是kiana指定的引數,且必...