记录编号 169494 评测结果 AAAAAAAAAAAAAAAAAAAA
题目名称 [CF520B]Two Buttons 最终得分 100
用户昵称 Gravatar甘罗 是否通过 通过
代码语言 Pascal 运行时间 0.001 s
提交时间 2015-07-09 13:59:02 内存使用 0.17 MiB
显示代码纯文本
program zht;
var
a,b,ans:longint;
begin
assign(input,'cf520B.in');
assign(output,'cf520B.out');
reset(input);
rewrite(output);
readln(a,b);
if a>b then begin writeln(a-b);exit;end;
while b<>1 do
begin
if b mod 2=0 then begin b:=b div 2;ans:=ans+1;end else begin b:=(b+1) div 2;ans:=ans+2;end;
if a>=b then begin writeln(ans+a-b);exit;end;
end;
close(input);
close(output);
end.