收藏本页
联系我们
论坛帮助

>> 这里讨论计算机的基础和设计到程序设计的数学问题。关于初赛的相关问题也可以到这里来！
趣题之家 → 信息学竞赛 → 计算机基础 → 翻译程序，帮忙翻译成pascal程序

  发表一个新帖子  发起一个新投票  回复本主题 您是本帖的第 4471 个阅读者
  标题：翻译程序，帮忙翻译成pascal程序 树形   打印   收藏   推荐  
     帅哥哟，离线，有人找我吗？
    
    
    等级：新手上路
    文章：2
    积分：61
    注册：2005-11-12
给feixue发送一个短消息 把feixue加入好友 查看feixue的个人资料 搜索feixue在的所有贴子 点击这里发送电邮给feixue 引用回复这个贴子 回复这个贴子 楼主
发贴心情 翻译程序，帮忙翻译成pascal程序

int i,n,l,r,m,len=1;


    long data[1000],d[1001];


    scanf("%d",&n);


    for(i=0;i<n;i++)


    {


        scanf("%ld",&data);


        d=INFIN;


    }


    d[0]=-INFIN;


    d[n]=INFIN;


    for(i=0;i<n;i++)


    {


        l=0; r=i+1;


        while(l<r)


        {


            m=(l+r)/2;


            if(data>=d[m])


                l=m+1;


            else


                r=m;


        }


        if(data<d[l])


            d[l]=data;


        if(l>len)


            len=l;


    }


    printf("%d\\n",len);

一往情深深几许？
发贴IP已设置保密 2005-11-15 17:46
       

 1   1   1/1页      1    


网上贸易 创造奇迹! 阿里巴巴 Alibaba

Powered By Dvbbs Version 7.1.0
Copyright ©2003 - 2006 QTHome.Org
页面执行时间 00.23438 秒, 3 次数据查询
 本论坛采用阿里巴巴支付宝网上银行支付系统，安全、可靠、便捷