zoukankan      html  css  js  c++  java
  • 机器翻译pascal程序

    题意:

    把一串数放进一个字典里,如果字典里没有相同的数,就把最先放的那一类数拿出来,把当前的数放进去,再统计一次。


    分析

    整个查字典过程如下:每行表示一个单词的翻译,冒号前为本次翻译后的内存状况:

    空:内存初始状态为空。

    第一个数时. 1:查找单词1 并调入内存。

    第二个数时. 1 2:查找单词2 并调入内存。

    第三个数时. 1 2:在内存中找到单词1。

    第四个数时. 1 2 5:查找单词5 并调入内存。

    第五个数时. 2 5 4:查找单词4 并调入内存替代单词1。

    第六个数时. 2 5 4:在内存中找到单词4。

    第七个数时. 5 4 1:查找单词1 并调入内存替代单词2。

    共计查了5 次词典。

    
    

    var
    m,n,tj,m1,i:longint;
    a,t:array[0..1000]of longint;
    m2:array[0..100]of longint;
    procedure work;
    var
    i:longint;
    begin
        for i:=1 to m-1 do
        m2[i]:=m2[i+1];
    end;


    begin
        readln(m,n);
        tj:=0;m1:=0;
        fillchar(t,sizeof(t),0);
        for i:=1 to n do
        begin
            read(a[i]);
            if (t[a[i]]=0)and(m1<m) then
            begin
                inc(tj);
                inc(m1);
                t[a[i]]:=1;
                m2[m1]:=a[i];
            end else
            if (t[a[i]]=0)and(m1=m) then
            begin
                inc(tj);
                t[m2[1]]:=0;
                work;
                m2[m]:=a[i];
                t[a[i]]:=1;
            end;
        end;
        write(tj);
    end.


  • 相关阅读:
    Java验证码
    Java内存泄漏问题
    Java常见异常总结
    Java编码与乱码问题
    Spring:源码解读Spring IOC原理
    Quartz 定时邮件发送多个备份文件
    spring-boot 多线程
    java并发基础
    Java多线程中wait语句的具体使用技巧
    多线程的死锁
  • 原文地址:https://www.cnblogs.com/YYC-0304/p/9500228.html
Copyright © 2011-2022 走看看