?? ac1290.pas
字號(hào):
program ural1290;
const
size=25000;
var
count:array[1..size]of word;
n,i,j:word;
begin
read(n);
for i:=1 to n do begin
read(j);
inc(count[j]);
end;
for i:=size downto 1 do
for j:=1 to count[i] do
writeln(i);
end.
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -