我不知道
by 我是我 @ 2015-12-02 13:32:40
去
by SHINIJI @ 2015-12-02 13:33:30
111
by xuzifeng2 @ 2015-12-02 14:43:53
```cpp
[codec ]var
i,j,n,temp:longint;
b:boolean;
temps:string;
f:array[1..100] of qword;
nm:array[1..100] of string;
y,m,d:array[1..100] of longint;
begin
readln(n);
for i:=1 to n do
readln(nm[i],y[i],m[i],d[i]);
for i:=1 to n do
f[i]:=y[i]*365+m[i]*30+d[i];
repeat
b:=true;
for i:=1 to n do
for j:=i to n do
if f[i]>f[j] then
begin
b:=false;
temp:=f[i];temps:=nm[i];
f[i]:=f[j];nm[i]:=nm[j];
f[j]:=temp;nm[j]:=temps;
end;
until b;
for i:=1 to n do
writeln(nm[i]);
end.[/codec ]
```
by shenxingyu @ 2015-12-05 18:17:58
```cpp
[codec ]var
i,j,n,temp:longint;
b:boolean;
temps:string;
f:array[1..100] of qword;
nm:array[1..100] of string;
y,m,d:array[1..100] of longint;
begin
readln(n);
for i:=1 to n do
readln(nm[i],y[i],m[i],d[i]);
for i:=1 to n do
f[i]:=y[i]*365+m[i]*30+d[i];
repeat
b:=true;
for i:=1 to n do
for j:=i to n do
if f[i]>f[j] then
begin
b:=false;
temp:=f[i];temps:=nm[i];
f[i]:=f[j];nm[i]:=nm[j];
f[j]:=temp;nm[j]:=temps;
end;
until b;
for i:=1 to n do
writeln(nm[i]);
end.[/codec ]
```
by shenxingyu @ 2015-12-05 18:18:56