NOIP2010 機器翻譯 題解

來源:互聯網
上載者:User

標籤:noip   pascal   2010   機器翻譯   

描述

小晨的電腦上安裝了一個機器翻譯軟體,他經常用這個軟體來翻譯英語文章。

這個翻譯軟體的原理很簡單,它只是從頭到尾,依次將每個英文單詞用對應的中文含義來替換。對於每個英文單詞,軟體會先在記憶體中尋找這個單詞的中文含義,如果記憶體中有,軟體就會用它進行翻譯;如果記憶體中沒有,軟體就會在外存中的詞典內尋找,查出單詞的中文含義然後翻譯,並將這個單詞和譯義放入記憶體,以備後續的尋找和翻譯。

假設記憶體中有M個單元,每單元能存放一個單詞和譯義。每當軟體將一個新單詞存入記憶體前,如果當前記憶體中已存入的單詞數不超過M-1,軟體會將新單詞存入一個未使用的記憶體單元;若記憶體中已存入M個單詞,軟體會清空最早進入記憶體的那個單詞,騰出單元來,存放新單詞。

假設一篇英語文章的長度為N個單詞。給定這篇待譯文章,翻譯軟體需要去外存尋找多少次詞典?假設在翻譯開始前,記憶體中沒有任何單詞。

格式輸入格式

輸入檔案共2行。每行中兩個數之間用一個空格隔開。

第一行為兩個正整數M和N,代表記憶體容量和文章的長度。

第二行為N個非負整數,按照文章的順序,每個數(大小不超過1000)代表一個英文單詞。文章中兩個單詞是同一個單詞,若且唯若它們對應的非負整數相同。

輸出格式

包含一個整數,為軟體需要查詞典的次數。

範例1範例輸入1[複製]
3 71 2 1 5 4 4 1
範例輸出1[複製]
5
限制

每個測試點1s

提示

對於10%的資料有M=1,N≤5。

對於100%的資料有0<=N<=100,0<=M<=1000。

整個查字典過程如下:每行表示一個單詞的翻譯,冒號前為本次翻譯後的記憶體狀況:
空:記憶體初始狀態為空白。

1. 1:尋找單詞1並調入記憶體。

2. 1 2:尋找單詞2並調入記憶體。

3. 1 2:在記憶體中找到單詞1。

4. 1 2 5:尋找單詞5並調入記憶體。

5. 2 5 4:尋找單詞4並調入記憶體替代單詞1。

6. 2 5 4:在記憶體中找到單詞4。

7. 5 4 1:尋找單詞1並調入記憶體替代單詞2。

共計查了5次詞典。

解一:

隊列,範圍很小,所以暴力尋找+暴力維護左右端點就行了,不用迴圈隊列。

var
  q:array[-1000..2000] of longint;  s,e,i,j,w,ans,m,n:longint;  flag:boolean;function size:longint;begin  exit(e-s+1);end;begin  readln(m,n);  s:=1;  e:=0;  ans:=0;  fillchar(q,sizeof(q),0);  for i:=1 to n do  begin    read(w);    flag:=false;        for j:=s to e do      if q[j]=w then flag:=true;    if not flag   //記憶體中沒有    then begin           ans:=ans+1;           e:=e+1;           q[e]:=w;           if size>m then s:=s+1;  //出隊列         end;  end;  writeln(ans);end.
解二:字串最佳化
var ram:ansistring;  i,j,k,l,m,n,sum,num:longint;function sr(x:longint):string;begin  str(x,sr);end;beginassign(input,‘translate.in‘);reset(input);assign(output,‘translate.out‘);reset(output);readln(m,n);  num:=0;  sum:=0;  ram:=‘‘;  for i:=1 to n do begin    read(k);    if pos(‘(‘+sr(k)+‘)‘,ram)=0 then begin      inc(sum);      if num=m then begin        delete(ram,1,pos(‘)‘,ram));        dec(num);      end;      ram:=ram+‘(‘+sr(k)+‘)‘;      inc(num);    end;  end;  readln;  writeln(sum);  close(input);  close(output);  end.

著作權聲明:本文為博主原創文章,未經博主允許不得轉載。

NOIP2010 機器翻譯 題解

聯繫我們

該頁面正文內容均來源於網絡整理,並不代表阿里雲官方的觀點,該頁面所提到的產品和服務也與阿里云無關,如果該頁面內容對您造成了困擾,歡迎寫郵件給我們,收到郵件我們將在5個工作日內處理。

如果您發現本社區中有涉嫌抄襲的內容,歡迎發送郵件至: info-contact@alibabacloud.com 進行舉報並提供相關證據,工作人員會在 5 個工作天內聯絡您,一經查實,本站將立刻刪除涉嫌侵權內容。

A Free Trial That Lets You Build Big!

Start building with 50+ products and up to 12 months usage for Elastic Compute Service

  • Sales Support

    1 on 1 presale consultation

  • After-Sales Support

    24/7 Technical Support 6 Free Tickets per Quarter Faster Response

  • Alibaba Cloud offers highly flexible support services tailored to meet your exact needs.