資訊學奧林匹克競賽 你的飛碟在這兒

2021-07-06 06:28:14 字數 1020 閱讀 5637

眾所周知,在每乙個彗星後都有乙隻ufo。這些ufo時常來收集地球上的忠誠支持者。不幸的是,他們的飛碟每次出行都只能帶上一組支持者。因此,他們要用一種聰明的方案讓這些小組提前知道誰會被彗星帶走。他們為每個彗星起了乙個名字,通過這些名字來決定這個小組是不是被帶走的那個特定的小組(你認為是誰給這些彗星取的名字呢?)。關於如何搭配的細節會在下面告訴你;你的任務是寫乙個程式,通過小組名和彗星名來決定這個小組是否能被那顆彗星後面的ufo帶走。 

小組名和彗星名都以下列方式轉換成乙個數字:最終的數字就是名字中所有字母的積,其中「a」是1,「z」是26。例如,「usaco」小組就是21*19*1*3*15=17955。如果小組的數字 mod 47等於彗星的數字mod 47,你就得告訴這個小組需要準備好被帶走!(記住「a mod b」是a除以b的餘數;34 mod 10等於4) 

寫出乙個程式,讀入彗星名和小組名並算出用上面的方案能否將兩個名字搭配起來,如果能搭配,就輸出「go」,否則輸出「stay」。小組名和彗星名均是沒有空格或標點的一串大寫字母(不超過6個字母)。

var

i,sum1,sum2:longint;

s1,s2:string;

begin

assign(input,'in.txt');

reset(input);

readln(s1);

readln(s2);

sum1:=1;

for i:=1 to length(s1) do

begin

sum1:=sum1*(ord(s1[i])-ord('a')+1);

end;

sum2:=1;

for i:=1 to length(s2) do

begin

sum2:=sum2*(ord(s2[i])-ord('a')+1);

end;

if sum1 mod 47=sum2 mod 47 then writeln('go')

else writeln('stay');

end.

資訊學奧林匹克競賽 ISBN號碼

每一本正式出版的圖書都有乙個isbn號碼與之對應,isbn碼包括9位數字 1位識別碼和3位分隔符,其規定格式如 x xx x 其中符號 就是分隔符 鍵盤上的減號 最後一位是識別碼,例如0 670 82162 4就是乙個標準的isbn碼。isbn碼的首位數字表示書籍的出版語言,例如0代表英語 第乙個分...

國際資訊學奧林匹克競賽 IOI

1987年,保加利亞的sendov教授在聯合國教科文組織第24屆全體會議上,倡議舉行國際資訊學奧林匹克,定名為international olympiad in informatics,簡稱ioi。首屆ioi於1989年5月在保加利亞首都索菲亞舉行。資訊學奧林匹克是計算機知識在世界範圍的青少年中普及...

資訊學奧林匹克競賽 運輸層協議

運輸層最重要的兩種協議 udp和tcp 運輸層向它上面的應用層提供通訊服務 從運輸層的角度看,通訊的真正端點並不是主機而是主機中的程序。運輸層的功能 復用 multiplexing 在傳送方不同的應用程序都可以使用同乙個運輸層協議傳送資料 分用 dumultiplexing 接收方的運輸層在剝去報文...