社区讨论

为什么?大圣，来呀？

aa1025213338
P1428小鱼比可爱参与者 11已保存回复 10

讨论操作

快速查看讨论及其快照的属性，并进行相关操作。

当前回复
10 条
当前快照
1 份
快照标识符
@mi4esiqj
此快照首次捕获于
2025/11/18 18:06
4 个月前
此快照最后确认于
2025/11/18 18:06
4 个月前
查看原帖
CPP
var
 a:array[1..10000] of integer;
 n:integer;
 c:array[1..10000] of integer;
 i,j:integer;
begin
 readln(n);
 for i:=1 to n do
 c[i]:=0;
 for i:=1 to n do
 begin
  read(a[i],' ');
 end;
 for i:=2 to n do
  begin
   for j:=1 to i-1 do
   begin
    if a[j]<a[i] then
    begin
     c[i]:=c[i]+1;
    end;
   end;
  end;
 for i:=1 to n do
 write(c[i],' ');
end.

回复

共 10 条回复，欢迎继续交流。

正在加载回复...