var
i,j,k,n,s,h:longint;
a:array[1..100001,1..3] of longint;
b:array[1..100001] of longint;
begin
readln(n);
for i:=1 to n do begin read(a[i,1]);a[i,2]:=1;end;
for i:=2 to n do
begin
k:=0;
for j:=1 to i-1 do
if (a[j,1]>a[i,1]) and (k<a[j,2]) then
begin
k:=a[j,2];
h:=j;
end;
a[i,2]:=a[i,2]+k;a[i,3]:=h;
end;
k:=0;
for i:=1 to n do
if a[i,2]>k then k:=a[i,2];
write(k);
end.
状态题目:免费午餐
题目编号:167-免费午餐 查看该题
状态: Unaccepted
测评机: Xeost[5]
得分: 40分
提交日期: 2008-9-15 10:29:00
有效耗时: 188毫秒
测试结果1: 选手程序运行超过时限
测试结果2: 选手程序无输出
测试结果3: 通过本测试点|有效耗时47:ms
测试结果4: 通过本测试点|有效耗时47:ms
测试结果5: 选手程序运行超过时限
测试结果6: 测试结果错误.错误结果为:1
正确结果应为:4
测试结果7: 选手程序运行超过时限
测试结果8: 通过本测试点|有效耗时47:ms
测试结果9: 通过本测试点|有效耗时47:ms
测试结果10: 测试结果错误.错误结果为:2
正确结果应为:1
.======.
| INRI |
| |
| |
.========’ ’========.
| _ xxxx _ |
| /_;-.__ / _\ _.-;_\ |
| `-._`’`_/’`.-’ |
’========.`\ /`========’
| | / |
|/-.( |
|\_._\ |
| \ \`;|
| > |/|
| / // |
| |// |
| \(\ |
| `` |
| |
| |
| |
| |
\\ _ _\\| \// |//_ _ \// _
^ `^`^ ^`` `^ ^` ``^^` `^^` `^ `^
.======.
| INRI |
| |
| |
.========’ ’========.
| _ xxxx _ |
| /_;-.__ / _\ _.-;_\ |
| `-._`’`_/’`.-’ |
’========.`\ /`========’
| | / |
|/-.( |
|\_._\ |
| \ \`;|
| > |/|
| / // |
| |// |
| \(\ |
| `` |
| |
| |
| |
| |
\\ _ _\\| \// |//_ _ \// _
^ `^`^ ^`` `^ ^` ``^^` `^^` `^ `^