174 条题解
-
0
cocker LV 6 @ 2007-11-16 15:04:37
编译通过...
├ 测试数据 01：运行超时|格式错误...
├ 测试数据 02：运行超时|格式错误...
├ 测试数据 03：运行超时|格式错误...
├ 测试数据 04：运行超时|格式错误...
├ 测试数据 05：运行超时|格式错误...
├ 测试数据 06：运行超时|格式错误...
├ 测试数据 07：运行超时|格式错误...
├ 测试数据 08：运行超时|格式错误...
├ 测试数据 09：运行超时|格式错误...
├ 测试数据 10：运行超时|格式错误...
---|---|---|---|---|---|---|---|-
Unaccepted 有效得分：0 有效耗时：0ms -
0
编译通过...
├ 测试数据 01：答案正确... 0ms
├ 测试数据 02：答案正确... 0ms
├ 测试数据 03：答案正确... 0ms
├ 测试数据 04：答案正确... 0ms
├ 测试数据 05：答案正确... 0ms
├ 测试数据 06：答案正确... 0ms
├ 测试数据 07：答案正确... 0ms
├ 测试数据 08：答案正确... 0ms
├ 测试数据 09：答案正确... 0ms
├ 测试数据 10：答案正确... 0ms
---|---|---|---|---|---|---|---|-
Accepted 有效得分：100 有效耗时：0ms难得1次AC，题目无任何难度，关键是格式问题，仅以此题锻炼一下字符串。。
-
0
Sino-Eagle LV 3 @ 2007-10-24 20:37:31
实际上第一个数字前面是没有空格的，看起来有的原因就是“1”的最左面没有那两竖。但是最后一个数字后面没有空格，这个要注意。
-
0
Alexandria LV 3 @ 2007-10-23 11:14:58
编译通过...
├ 测试数据 01：答案正确... 0ms
├ 测试数据 02：答案正确... 0ms
├ 测试数据 03：答案正确... 0ms
├ 测试数据 04：答案正确... 0ms
├ 测试数据 05：答案正确... 0ms
├ 测试数据 06：答案正确... 0ms
├ 测试数据 07：答案正确... 0ms
├ 测试数据 08：答案正确... 0ms
├ 测试数据 09：答案正确... 0ms
├ 测试数据 10：答案正确... 0ms
---|---|---|---|---|---|---|---|-
Accepted 有效得分：100 有效耗时：0msWS题啊！！！前面居然有空格！！！
-
0
zzhhbb1989 LV 3 @ 2007-10-18 20:09:47
Warning!!!!!!!!
第一行和最后一行都没有空格,但题目说每一个数字前都有空格,而且input format的最后一个数字后面有空格,严重BS出题的人,你是不是从小到大只学了PASCAL,没学语文哦 -
0
编译通过...
├ 测试数据 01：运行超时|格式错误...
├ 测试数据 02：运行超时|格式错误...
├ 测试数据 03：运行超时|格式错误...
├ 测试数据 04：运行超时|格式错误...
├ 测试数据 05：运行超时|格式错误...
├ 测试数据 06：运行超时|格式错误...
├ 测试数据 07：运行超时|格式错误...
├ 测试数据 08：运行超时|格式错误...
├ 测试数据 09：运行超时|格式错误...
├ 测试数据 10：运行超时|格式错误...
---|---|---|---|---|---|---|---|-
Unaccepted 有效得分：0 有效耗时：0ms大家帮看看这是怎么回事啊??
-
0
zhaojianbo LV 6 @ 2007-09-29 16:42:47
这题挺有意思:
一次AC
先把8弄出来
其他的只要把8改一下就OK了 -
0
这是怎么回事
编译通过...
├ 测试数据 01：运行超时|格式错误...
├ 测试数据 02：运行超时|格式错误...
├ 测试数据 03：运行超时|格式错误...
├ 测试数据 04：运行超时|格式错误...
├ 测试数据 05：运行超时|格式错误...
├ 测试数据 06：运行超时|格式错误...
├ 测试数据 07：运行超时|格式错误...
├ 测试数据 08：运行超时|格式错误...
├ 测试数据 09：运行超时|格式错误...
├ 测试数据 10：运行超时|格式错误...
---|---|---|---|---|---|---|---|-
Unaccepted 有效得分：0 有效耗时：0ms -
0
cool_leaf_xp LV 3 @ 2007-08-28 08:53:29
竟然是读数的问题!!!
开始是读 char 用eof判断是否读完 0分
后来改成 直接读string才AC! -
0
parachutes LV 3 @ 2007-08-26 21:19:54
无聊题。。。。打字打到手抽筋。
-
0
xhdhr10000 LV 7 @ 2007-08-16 16:19:38
编译通过...
├ 测试数据 01：答案正确... 0ms
├ 测试数据 02：答案正确... 0ms
├ 测试数据 03：答案正确... 0ms
├ 测试数据 04：答案正确... 0ms
├ 测试数据 05：答案正确... 0ms
├ 测试数据 06：答案正确... 0ms
├ 测试数据 07：答案正确... 0ms
├ 测试数据 08：答案正确... 0ms
├ 测试数据 09：答案正确... 0ms
├ 测试数据 10：答案正确... 0ms
---|---|---|---|---|---|---|---|-
Accepted 有效得分：100 有效耗时：0ms……60行搞定
-
0
var s:ansistring;
n,i,j,k,l,p,q:longint;
begin
readln(k);readln(s);
l:=length(s);
for i:=1 to 2*k+3 do
begin if (i=1)or(i=k+2)or(i=2*k+3) then begin
for j:=1 to l do
begin
case s[j] of
'1':write(' ');
'0':if i=k+2 then for p:=1 to k+2 do write(' ')
else begin write(' ');
for p:=1 to k do write('-');
write(' ');
end;
'4':if i=k+2 then begin write(' ');
for p:=1 to k do write('-');
write(' ');
end
else begin for p:=1 to k+2 do
write(' ');
end;
'7':if i=1 then begin write(' ');
for p:=1 to k do write('-');
write(' ');
end
else begin for p:=1 to k+2 do
write(' ');
end;
else begin write(' ');
for p:=1 to k do write('-');
write(' ');
end;
end;
if jl then write(' ');
end;
end
else begin
for j:=1 to l do
case s[j]of
'1':begin write('|');if jl then write(' ');end;
'2':begin if (i>1)and(i1)and(i1)and(i1)and(i1)and(i
cocker
LV 6
@ 2007-11-16 15:04:37
