摘要: 1.求两数的最大公约数function gcd(a,b:integer):integer; begin if b=0 then gcd:=a else gcd:=gcd (b,a mod b); end ;2.求两数的最小公倍数function lcm(a,b:intege... 阅读全文
posted @ 2015-11-06 10:31 OI_songer 阅读(563) 评论(0) 推荐(0) 编辑
摘要: 题目来自CODE[VS]-->热浪1557 热浪 时间限制: 1 s 空间限制: 256000 KB 题目等级 : 钻石 题目描述 Description德克萨斯纯朴的民眾们这个夏天正在遭受巨大的热浪!!!他们的德克萨斯长角牛吃起来不错,可是他们并不是很擅长生產富含奶油的乳製品。FarmerJo... 阅读全文
posted @ 2015-11-06 10:28 OI_songer 阅读(440) 评论(0) 推荐(0) 编辑
摘要: 马上就快要考试了,然而突然发现自己图论已经废了,于是再都打一遍练练手。。。。。。 1 const 2 maxn=100; 3 maxe=maxn*maxn; 4 5 type 6 edge=record ... 阅读全文
posted @ 2015-11-02 15:37 OI_songer 阅读(231) 评论(0) 推荐(0) 编辑
摘要: 先上题:【问题描述】 众所周知,JY的百度搜索算法已经练的炉火纯青,任何搜索题都能0.000ms出解。 不幸的是,JY遇到了一道百度搜索算法解决不了的题目,题目是这样的: 给定N个数A[1] A[2] .. A[N],你需要将其重新排序,满足: 1. 对于1=A[i/2]。(i/2取下整) 2. 在... 阅读全文
posted @ 2015-10-28 22:20 OI_songer 阅读(293) 评论(0) 推荐(0) 编辑
摘要: 题目描述 Description有n堆石子排成一列,每堆石子有一个重量w[i], 每次合并可以合并相邻的两堆石子,一次合并的代价为两堆石子的重量和w[i]+w[i+1]。问安排怎样的合并顺序,能够使得总合并代价达到最小。输入描述 Input Description第一行一个整数n(nfmin[i,j... 阅读全文
posted @ 2015-09-29 20:55 OI_songer 阅读(606) 评论(0) 推荐(0) 编辑
摘要: type thash=^node; node=record state:longint; next:thash; end;var a,i:longint; p:thash; hash:array[0..11]of thash; //Hash表procedure inse... 阅读全文
posted @ 2015-09-29 20:52 OI_songer 阅读(394) 评论(0) 推荐(0) 编辑