OJ Board

When will these problems occure ??

Can you help me, why I got WA ?
[pascal]
program dupa;
var
wie :longint;
jakie :string;
i,j :longint;
n :longint;
puste,pelne :string;
begin
readln(wie,jakie);
while wie>0 do
begin
pelne:='';
puste:='';
n:=length(jakie);
for i:=1 to wie do
begin
puste:=puste+' ';
pelne:=pelne ...

Don't do it in this way. Use an array[1..100000] where you remember every log(n!). Then your formula is very simple.

Is input and output corect ? In my opinion output for
3
3 3 2
7 7 1
8 1 1
3 8 1 -4
should be
1 inf
The ray goes from point (3,8), is directed to point (1,-4), hits the 1'st sphere and goes to infinitiy. Am I right ?

And wlt should be the output ???