2016年10月8日
noi4_6_1799[最短前缀]
摘要： 字典树。数据不大，代码不短…… 阅读全文
posted @ 2016-10-08 23:46 love_saber 阅读(721) 评论(0) 推荐(0) 编辑
2016年10月5日
noi4_7_8468[单词序列]
摘要： 爆搜都能过……我佩服它的数据规模 阅读全文
posted @ 2016-10-05 22:04 love_saber 阅读(267) 评论(1) 推荐(0) 编辑
noi4_1_1754[字符串数组排序问题]
摘要： 没忽略空格竟AC var way:string; a,b:array[1..100000] of string; n:longint; function cl(a,b:string):boolean;begin if (way='inc')or(way='dec') then exit(a>b); 阅读全文
posted @ 2016-10-05 21:13 love_saber 阅读(354) 评论(0) 推荐(0) 编辑
noi4_1_1999[日志排序]
摘要： 复杂的判断&多余的空格=n个wrong answer 阅读全文
posted @ 2016-10-05 20:50 love_saber 阅读(245) 评论(0) 推荐(0) 编辑
noi1_13_41[判断元素是否存在]
摘要： 简单的dfs。不必考虑时间。瞬秒。 阅读全文
posted @ 2016-10-05 00:17 love_saber 阅读(296) 评论(0) 推荐(0) 编辑
【2011noip提高】选择客栈
摘要： 不会O（n）……只好用线段树O（nlogn） uses math;var n,k,p,i,j,c,ans,minp,tot:longint; co:array[0..50,0..50000] of longint; f:array[0..600000] of longint; a:array[0.. 阅读全文
posted @ 2016-10-05 00:03 love_saber 阅读(310) 评论(0) 推荐(0) 编辑
2016年10月4日
noi4_6_3528[最小新整数]
摘要： 经典的贪心，每次去掉第一个递增序列最后一个数字，（少了一个等号查了20min错TAT） 阅读全文
posted @ 2016-10-04 22:01 love_saber 阅读(290) 评论(0) 推荐(0) 编辑
noi1_13_48[实数加法]
摘要： 高精度小数加法……一开始对齐弄了半天，teacher却告诉我可以固定小数点在数组的100号…… uses math;type arr=array[-1..200] of longint;var a,b,c:arr;procedure putin(var a:arr);var k,i:longint; 阅读全文
posted @ 2016-10-04 19:14 love_saber 阅读(389) 评论(0) 推荐(0) 编辑
2016年9月25日
math与cena之争
摘要： 今天用cena测金陵中学一次竞赛（圣诞赛）……被cena狠狠坑了…… 源码： uses math;var a:array[1..200] of longint; f:array[1..200,1..200] of boolean; n,i,big,j,x:longint;begin assign(i 阅读全文
posted @ 2016-09-25 22:24 love_saber 阅读(163) 评论(0) 推荐(0) 编辑