Обсуждение @ 1100. Таблица результатов @ Timus Online Judge

here is a solvation

Послано Costel::icerapper@k.ro 25 фев 2002 21:17

program timus_1100;
const
maxn=150000;
var
ID:array[1..maxn]of longint;
np:array[1..maxn]of byte;
n:longint;
i,j:longint;
begin
readln(n);
for i:=1 to n do
    readln(ID[i],np[i]);
for i:=100 downto 0 do
    for j:=1 to n do
      if np[j]=i then
        writeln(ID[j],' ',np[j]);
end.

Re: here is a solvation

Послано ECUST Multistar 12 мар 2002 16:11

the difficulty is too high!

No, it can work out the problem in the limited time!

Послано Bighead 19 апр 2002 18:50

Re: here is a solvation

Послано Mukabe Abi 31 мар 2003 18:41

> program timus_1100;
> const
>   maxn=150000;
> var
>   ID:array[1..maxn]of longint;
>   np:array[1..maxn]of byte;
>   n:longint;
>   i,j:longint;
> begin
>   readln(n);
>   for i:=1 to n do
>     readln(ID[i],np[i]);
>   for i:=100 downto 0 do
>     for j:=1 to n do
>       if np[j]=i then
>         writeln(ID[j],' ',np[j]);
> end.
>

Re: here is a solvation

Послано 杀（kill）希特勒 10 авг 2004 15:19

MLE also!

Re: here is a solvation

Послано 杀（kill）希特勒 10 авг 2004 15:19

MLE also!

Re: here is a solvation

Послано Katy 10 июл 2006 00:49

i used this way and i've got wrong answer it third test.

Re: here is a solvation

Послано Katy 10 июл 2006 00:50

Costel::icerapper@k.ro писал(a) 25 февраля 2002 21:17

maxn=150000;

why 15000???? you have only 100!!!!

My time 0.124 with it but little upgraded for optimization

Послано IlushaMax 13 мар 2016 23:30

Обсуждение задачи 1100. Таблица результатов