我的语文是怎么学的....题目死活读不懂...
题目 1355 读书
2014-03-15 21:14:51
|
|
被数据虐死了= =
|
|
sort好用啊
|
|
/擦汗,这什么无语题,AC写成P。。
|
|
题目 799 [USACO 1.1] 你的飞碟在这儿
2014-03-15 17:52:24
|
|
/擦汗,在WAN次之后。。我终于发现原来是从1900年开始的。。可是1990年开始竟然也能对3个点。。/擦汗,真是神奇的巧合!
题目 676 黑色星期五
2014-03-15 15:47:36
|
|
原来这么简单……一个SPFA的事……矮油我了个去……
|
|
|
|
Gray Code
|
|
|
|
题目 1545 [UVa 1402] 机器排序
2014-03-14 22:48:33
|
|
splay真好玩蛤蛤蛤(不过目测考试的时候写不出来)……
|
|
|
|
怎么写题的时候出现了一个奇奇怪怪的问题,然后奇奇怪怪地就过了
|
|
终于过了,简直艰难______________同楼上,这代码几乎是背会的
|
|
program pj024;
const dx: array[1 .. 8] of Shortint = (-2, -1, 1, 2, 2, 1, -1, -2); dy: array[1 .. 8] of Shortint = (1, 2, 2, 1, -1, -2, -2, -1); var n, m, x, y, i, j: Byte; g: array[0 .. 20, 0 .. 20] of Byte; f: array[0 .. 20, 0 .. 20] of Comp; begin assign(input,'pj024.in'); assign(output,'pj024.out'); reset(input); rewrite(output); Readln(n, m, x, y); Fillchar(g, Sizeof(g), 0); g[x, y] := 1; for i := 1 to 8 do if (x + dx[i] >= 0) and (x + dx[i] <= n) and (y + dy[i] >= 0) and (y + dy[i] <= m) then g[x + dx[i], y + dy[i]] := 1; f[0, 0] := 1; for i := 1 to n do if g[i, 0] = 0 then f[i, 0] := f[i - 1, 0]; for i := 1 to m do if g[0, i] = 0 then f[0, i] := f[0, i - 1]; for i := 1 to n do for j := 1 to m do if g[i, j] = 0 then f[i, j] := f[i - 1, j] + f[i, j - 1]; Writeln(f[n, m]:0:0); close(input); close(output); end.
题目 78 [NOIP 2002]过河卒
2014-03-14 20:22:05
|
|
-1 -1 -1 神坑测试数据
题目 1396 w函数
2014-03-14 19:29:51
|
|
累死了>﹏<
|
|
我的暴力竟然过了70
所以什么是拓展欧几里得算法
题目 1265 [NOIP 2012]同余方程
2014-03-14 13:53:59
|
|
回复 @digital-T : ORZZZZ
题目 1543 最优挤奶法
2014-03-13 23:54:46
|