P2550 AHOI2001 彩票搖獎

2021-07-30 09:51:20 字數 1590 閱讀 8472

為了豐富人民群眾的生活、支援某些社會公益事業,北塔市設定了一

項彩票。該彩票的規則是:

(1) 每張彩票上印有 7 個各不相同的號碼,且這些號碼的取指範圍為 1~33。

(2) 每次在兌獎前都會公布乙個由七個各不相同的號碼構成的中獎號碼。

(3) 共設定 7 個獎項,特等獎和一等獎至六等獎。兌獎規則如下:

特等獎:要求彩票上 7 個號碼都出現在中獎號碼中。

一等獎:要求彩票上有 6 個號碼出現在中獎號碼中。

二等獎:要求彩票上有 5 個號碼出現在中獎號碼中。

三等獎:要求彩票上有 4 個號碼出現在中獎號碼中。

四等獎:要求彩票上有 3 個號碼出現在中獎號碼中。

五等獎:要求彩票上有 2 個號碼出現在中獎號碼中。

六等獎:要求彩票上有 1 個號碼出現在中獎號碼中。

注:兌獎時並不考慮彩票上的號碼和中獎號碼中的各個號碼出現的位

置。例如,中獎號碼為 23 31 1 14 19 17 18,則彩票 12 8 9 23

1 16 7 由於其中有兩個號碼(23 和 1)出現在中獎號碼中,所以該彩票中

了五等獎。

現已知中獎號碼和小明買的若干張彩票的號碼,請你寫乙個程式幫助

小明判斷他買的彩票的中獎情況。

輸入格式:

檔案的第一行只有乙個自然數 n (n < 1000) ,表示小明買的彩票張數;

第二行存放了 7 個介於 1 和 33 之間的自然數,表示中獎號碼;

在隨後的 n 行中每行都有 7 個介於 1 和 33 之間的自然數,分別表

示小明所買的 n 張彩票。

輸出格式:

依次輸出小明所買的彩票的中獎情況(中獎的張數),首先輸出特等

獎的中獎張數,然後依次輸出一等獎至六等獎的中獎張數。

輸入樣例#1:

2

23 31 1 14 19 17 18

12 8 9 23 1 16 7

11 7 10 21 2 9 31

輸出樣例#1:

0 0 0 0 0 1 1

var

a:array[1..1000,0..1000] of integer;

t:array[0..7] of integer;

ans:array[1..1000] of integer;

n,m,j,k,i:longint;

begin

readln(n);

for i:=1 to 7 do

read(ans[i]);

readln;

for i:=1 to n do

for j:=1 to 7 do

read(a[i,j]);

k:=1;

for i:=1 to n do

for j:=1 to 7 do

for k:=1 to 7 do

if a[i,k]=ans[j] then inc(a[i,0]);

for i:=1 to n do

inc(t[8-a[i,0]]);

for i:=1 to 7 do

write(t[i],' ');

end.

題解 P2550 AHOI2001 彩票搖獎

題目鏈結 大家有沒有發現資料範圍好小呀 我們只需要開7 8的陣列就好!中間比較的時候懶得用for迴圈比較了。直接爆搜。廢話不多說,直接上 includeusing namespace std int a 7 作為中獎號碼 int b 7 作為每一回彩票號碼 int c 7 作為中獎的等級 intma...

P1403 AHOI2005 約數研究

科學家們在samuel星球上的探險得到了豐富的能源儲備,這使得空間站中大型計算機 samuel ii 的長時間運算成為了可能。由於在去年一年的辛苦工作取得了不錯的成績,小聯被允許用 samuel ii 進行數學研究。小聯最近在研究和約數有關的問題,他統計每個正數n的約數的個數,並以f n 來表示。例...

P2536 AHOI2005 病毒檢測

對於 符號,明明可以讓相同位置再次匹配下乙個,或者跳過當前位置匹配,但是卻寫了個把trie的子樹全部push進佇列的垃圾寫法,結果一直mle 告辭模板串多且不長,可以塞到trie樹里,這個東西貌似叫trie樹上模糊匹配?然後直接bfs爆搜,注意記錄乙個vis i j 表示第i個節點和第j個位置匹配的...