Submission #1267661


Source Code Expand

program j01;
var a,b,c,time,ta,tb,tc:int64;
begin
  readln(a,b,c);
  if(a=b)and(b=c)then
  begin
    if a mod 2=1 then writeln(0) else  
    writeln(-1);halt;
  end;
  time:=0;
  while(a mod 2=0)and(b mod 2=0)and(c mod 2=0)do
  begin
    ta:=(b+c)div 2;tb:=(a+c)div 2;tc:=(a+b)div 2;
    a:=ta;b:=tb;c:=tc;inc(time);
    if time>10000000 then begin writeln(-1);halt;end;
  end;
  writeln(time);
end.

Submission Info

Submission Time
Task A - Cookie Exchanges
User oldjang
Language Pascal (FPC 2.6.2)
Score 300
Code Size 420 Byte
Status AC
Exec Time 0 ms
Memory 128 KB

Compile Error

/usr/bin/ld.bfd: warning: ./link.res contains output sections; did you forget -T?

Judge Result

Set Name Sample All
Score / Max Score 0 / 0 300 / 300
Status
AC × 3
AC × 17
Set Name Test Cases
Sample sample1.txt, sample2.txt, sample3.txt
All sample1.txt, sample2.txt, sample3.txt, in1.txt, in10.txt, in11.txt, in2.txt, in3.txt, in4.txt, in5.txt, in6.txt, in7.txt, in8.txt, in9.txt, sample1.txt, sample2.txt, sample3.txt
Case Name Status Exec Time Memory
in1.txt AC 0 ms 128 KB
in10.txt AC 0 ms 128 KB
in11.txt AC 0 ms 128 KB
in2.txt AC 0 ms 128 KB
in3.txt AC 0 ms 128 KB
in4.txt AC 0 ms 128 KB
in5.txt AC 0 ms 128 KB
in6.txt AC 0 ms 128 KB
in7.txt AC 0 ms 128 KB
in8.txt AC 0 ms 128 KB
in9.txt AC 0 ms 128 KB
sample1.txt AC 0 ms 128 KB
sample2.txt AC 0 ms 128 KB
sample3.txt AC 0 ms 128 KB