var
a:array[1..1000] of integer;
i,j,n,t:integer;
begin
readln(n);
for i:=1 to n do
read(a[i]);
for i:=1 to n-1 do 这里是选排，速度与冒泡差不多
for j:=i+1 to n do
if a[i]
end;
writeln(a[2],' ',a[3]);
end.
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024