主题:哎^^^^^怎么做不来啊
chenzhong
[专家分:250] 发布于 2005-08-28 19:48:00
1.在6*6的方格中放24个球,要求每行每列都有4个球.编程打印出方案.
2.1---9的数字如下排列,在相邻数字之间减开,正反排列,形成2个9位数.编程打印出两数之差能被396整除的方案.
9
1 3
7 4
5 2
8 6
这两天我做题目怎么总是做不来的多于会做的.哎^^^^^^^^^^真自卑啊[em21][em21][em21][em21][em21][em21][em21][em21]
回复列表 (共9个回复)
沙发
yukangcool [专家分:460] 发布于 2005-08-28 22:31:00
2题简单啊,源程序如下:
program xxxxx;
begin
writeln(' 9 ');
writeln(' 1 3');
writeln('7 4');
writeln(' 5 2');
writeln(' 8 6');
end.
如果这是经典程序,就给我加30分!
板凳
阿Ben [专家分:2200] 发布于 2005-08-28 22:53:00
第一题用深度优先搜索;第二题的题意未明。
3 楼
yukangcool [专家分:460] 发布于 2005-08-28 23:07:00
2楼的答案是我没把问题看清楚,晕死。。
2题我也没搞明白?
4 楼
hz10213534 [专家分:10] 发布于 2005-08-29 13:14:00
jbnkhjbljblhjk
5 楼
lzl1403 [专家分:1670] 发布于 2005-08-29 16:43:00
第二题意思是不是可以这样展开为两个9位数:
934268571和175862439
然后把每种可能的展开得出的两个9位数相减,若差能被396整除则输出
如果是这样的话,看看下面的程序:
s1:='93426857193426857';
for i:=1 to 9 do
begin
s2:=copy(s1,i,9);
s3:=s2;
for j:=1 to 9 do
s3[j]:=s2[10-j];
val(s2,t1,code);
val(s3,t2,code);
if abs(t1-t2) mod 396=0
then begin
writeln(s2);
writeln(s3);
end;
end;
6 楼
风花雪月☆雨 [专家分:460] 发布于 2005-08-29 18:37:00
第 1 楼
2题简单啊,源程序如下:
program xxxxx;
begin
writeln(' 9 ');
writeln(' 1 3');
writeln('7 4');
writeln(' 5 2');
writeln(' 8 6');
end.
如果这是经典程序,就给我加30分!
高人,佩服佩服
7 楼
yukangcool [专家分:460] 发布于 2005-08-29 22:33:00
哈哈,是吗?本人原创,绝对经典(有50分了,谢谢了,不用加了)
8 楼
lzl1403 [专家分:1670] 发布于 2005-08-29 23:35:00
看看楼上的对话,再看看自己回的帖,我有些糊涂了:原来程序可以如此经典啊……
佩服佩服……
9 楼
风花雪月☆雨 [专家分:460] 发布于 2005-09-01 10:10:00
我估计这种题是不可能上NOI或IOI的
我来回复