Обсуждение @ 1223. Chernobyl’ Eagle on a Roof @ Timus Online Judge

Показать все сообщения Спрятать все сообщения

WA????????????? Oleg 2 дек 2002 14:44

var i,j,k,n,m:longint;
begin
while true do
begin
read(n);
if n =0 then halt(0);
read(m);
if n=1 then k:=1 else k:=0;
while n<>1 do
begin
   dec(n);
   m:=(m div 2) + (m mod 2);
   inc(k);
end;
m:=m-1+k;
writeln(m);
end;
end.

Re: WA????????????? Azrael 7 дек 2002 01:35

Because answer at 2 1000 is not 500:))
It's about 47 (can't remember exectly)

can`t remember exectly Oleg 7 дек 2002 19:16

why???????????????????????

WA HELP PLEASE Oleg 15 дек 2002 09:22

var i,j,k,n,m:longint;
begin
while true do
begin
   read(n);
   if n =0 then halt(0);
   read(m);
   if n=1 then k:=1 else k:=0;
   while n<>1 do
   begin
    dec(n);
    m:=(m div 2) + (m mod 2);
    inc(k);
   end;
   m:=m-1+k;
   writeln(m);
end;
end.

Re: WA HELP PLEASE Azrael 15 дек 2002 22:51

Watch my previous message.
Read task.

wy 2 1000 =47?????? Oleg 17 дек 2002 09:19

> Watch my previous message.
> Read task.

Re: wy 2 1000 =47?????? mistaken 19 сен 2003 18:38

You are wrong!
2 1000 = 45

Обсуждение задачи 1223. Chernobyl’ Eagle on a Roof