随笔分类 - noi题库
摘要:没忽略空格竟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);
阅读全文
摘要:复杂的判断&多余的空格=n个wrong answer
阅读全文
摘要:简单的dfs。不必考虑时间。瞬秒。
阅读全文
摘要:不会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..
阅读全文
摘要:经典的贪心,每次去掉第一个递增序列最后一个数字,(少了一个等号查了20min错TAT)
阅读全文
摘要:高精度小数加法……一开始对齐弄了半天,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;
阅读全文

浙公网安备 33010602011771号