Codevs P1294 全排列

Codevs P1294 全排列

---

题目描述 Description

给出一个n, 请输出n的所有全排列

---

输入输出

输入描述 Input Description

读入仅一个整数n (1<=n<=10)

---

输出描述 Output Description

一共n!行，每行n个用空格隔开的数，表示n的一个全排列。并且按全排列的字典序输出。

样例Sample

样例输入 Sample Input

3

样例输出 Sample Output

1 2 3
1 3 2
2 1 3
2 3 1
3 1 2
3 2 1

---

分析

。。。无话可说；；；；

---

代码如下

program p1294;
var n,i:longint;
    num:array[1..10000] of longint;
    used:array[1..10000] of boolean;
procedure print;
var i:integer;
begin
 for i:=1 to n do
  write(num[i],' ');
 writeln;
end;

procedure dfs(step:integer);
var k:integer;
begin
 for k:=1 to n do
  if not used[k]
   then
    begin
     num[step]:=k;
     used[k]:=true;
     if step<n then dfs(step+1);
     if step=n then print;
     used[k]:=false;
    end;
end;

begin
 readln(n);
 for i:=1 to n do used[i]:=false;
 dfs(1);
end.

测试结果

测试通过 Accepted

总耗时: 392 ms
0 / 0 数据通过测试.
运行结果
测试点#1.in 结果:AC 内存使用量: 256kB 时间使用量: 1ms
测试点#2.in 结果:AC 内存使用量: 256kB 时间使用量: 1ms
测试点#3.in 结果:AC 内存使用量: 256kB 时间使用量: 3ms
测试点#4.in 结果:AC 内存使用量: 880kB 时间使用量: 36ms
测试点#5.in 结果:AC 内存使用量: 6896kB 时间使用量: 351ms

念去去

雨霖铃

         作者：柳永  

寒蝉凄切，对长亭晚，骤雨初歇。都门帐饮无绪，留恋处，兰舟摧发。执手相看泪眼，竟无语凝噎。念去去千里烟波，暮霭沈沈楚天阔。
多情自古伤离别，更那堪冷落清秋节。今宵酒醒何处，杨柳岸、晓风残月。此去经年，应是良辰好景虚设。便纵有千种风情，更与何人说。

---

江城子·乙卯正月二十日夜记梦

苏轼
十年生死两茫茫，不思量，自难忘。
千里孤坟，无处话凄凉。
纵使相逢应不识，尘满面，鬓如霜。
夜来幽梦忽还乡，小轩窗，正梳妆。
相顾无言，惟有泪千行。
料得年年肠断处，明月夜，短松冈。