Question

编程题 算法

题目描述：
在颁奖典礼上，lxh和pfz都没有听台上在说什么，而是在下面讨论当晚的美式足球比赛，lxh预测说纽约巨人队今晚将会得到11分，pfz马上说不可能。因为通常来说美式足球比赛的得分只有3分和7分两种形式，无论怎么得分都不可能得到11分。想了一会以后，lxh发现其实11分以上的分数都是可以得到，于是11就是最大的不可以得到的分数。现在问题来了，如果比赛的得分只有x分和y分两种形式，那么最大的不可以得到的分数是多少呢？

输入：
本题包括多组输入。每组输入2个整数x, y (2 ≤ x, y ≤ 108), x=y=0表示输入结束

输出：
对于每组输入，输出一行，若存在一个最大的不可以得到的分数，则输出此分数，否则输出Inf

样例输入：
3 7
2 2
0 0

样例输出：
11
Inf

Answer 1

//用的PASCAL写的不知道看不看的懂整体思路
//应该就是这个样子的语言实现就无所谓了
//程序不完整有带改善~_~!
var a,b:Integer;
k:Integer;
k2:Integer;
i,j,m:Integer;
key:boolean; //退出循环条件（成功匹配）
Count:integer; //判断程序上半段是否成功
begin
key:=False;
Count:=0;
a:=StrToInt(Edta.text);
b:=StrToInt(Edtb.Text);
k:=a*b;
k2:=2*k;
for m:=k+1 to k2 do
begin
for i:=0 to 2*b do
begin
for j:=0 to 2*a do
begin
if i*a+j*b = m then
begin
key:=true;
break;
end;
end;
if key then
break;
end;
if not key then
begin
Count:=Count+1;
showMessage(intToStr(m));
end
else
key:=False;
end;
//以上用来判断是否可无限循环 m 为两数最小公因数（这里用乘机替代了，用公因数替代M即可）
//如果上面判断无异常就说明可循环再从最小公因数开始用循环来取其最大一个不能实现的分数后挑出循环即可
if Count> 0 then
begin
key:=False;
for m:=k downto b do
begin
for i:=0 to b do
begin
for j:=0 to a do
begin
if i*a+j*b = m then
begin
key:=true;
break;
end;
end;
if key then
begin
break;
end
end;
if not key then
begin
showMessage('Your is:'+intToStr(m));
end;
key:=False;
end;
end;
end;

Answer 2

题目很有意思，如果你多给悬赏分，我就做做试试~