duang (UID: 105439)
注册于 2015-03-31 19:51:00, 最后登录于 2017-03-03 09:24:41, 目前离线.
解决了 51 道题目，RP: 576.65 (No. 3092)
-
讨论 (0)
这个用户还没有发布过讨论 -
贡献 (1)
-
递交 (142)
最近递交
状态 题目 递交者 时间 内存 语言 递交时间 P1617 超级教主 duang ≥3403ms ≥1.93 MiB Pascal 2016-03-18 22:04:58 P1617 超级教主 duang ≥3387ms ≥1.938 MiB Pascal 2016-03-18 22:03:35 P1617 超级教主 duang ≥2246ms ≥1.555 MiB Pascal 2016-03-18 21:58:33 P1617 超级教主 duang 154ms 1.551 MiB Pascal 2016-03-18 21:47:39 P1211 生日日数 duang 0ms 804.0 KiB Pascal 2016-03-17 20:34:53 P1201 高低位交换 duang 0ms 804.0 KiB Pascal 2016-03-17 14:54:47 P1201 高低位交换 duang 15ms 804.0 KiB Pascal 2016-03-17 14:53:47 P1201 高低位交换 duang 0ms 804.0 KiB Pascal 2016-03-17 14:51:58 P1201 高低位交换 duang 0ms 804.0 KiB Pascal 2016-03-17 14:50:36 P1201 高低位交换 duang 30ms 804.0 KiB Pascal 2016-03-17 14:49:23
个人简介
var i,j,n,m,k:longint;
a:array[1..5000,1..100] of integer;
begin
readln(n,m);
for i:=1 to n do a[i,1]:=1;
for i:=2 to n do
for j:=1 to m do