水果盛宴

前言
”谢谢你，谢你大爷，谢你全家，谢你祖宗十八代！“欢迎来到嘟嘟课堂。今天，嘟嘟老师讲一道DFS题——水果盛宴。
题目描述
贝茜（胡晟智）又再一次地闯入了 Farmer John （高珏颐）的房子（女生宿舍）！（犯了七不准）她在厨房发现了一堆柠檬和一堆橘子（每堆都有无限多个），并且，她希望尽可能地多吃。
贝茜的有一个饱腹值上限 T(1<=T<=5,000,000)。吃一个橘子会增加她 A 点饱腹值，吃一个柠檬会增加她 B 点饱腹值(1<=A,B<=T)，如果她愿意，贝茜可以最多喝一次水，这会立即使她的饱腹值变成一半
帮助贝茜求出她可以获得的最大饱腹值
输入
一行三个整数 T,A 和 B
输出
一行一个整数，表示贝茜可获得的最大饱腹值。
样例输入
8 5 6
样例输出
8
思路
本题就是一道深搜题，暴力搞不出来。搜索吃橘子、吃柠檬和喝水的饱腹值，就能A了。不需要什么记忆化。考试时加了记忆化，就错了。详见代码。
代码

uses math;
var
        f:array[0..5000000] of boolean;
        a,b,t,ans:longint;
        p:boolean;
procedure sb(i:longint);
begin
        f[i]:=true;
        if (i+a<=t) then
        begin
                ans:=max(ans,i+a);
                if (ans=t) then
                begin
                        writeln(t);
                        {close(input);
                        close(output);}
                        halt;
                end;
                if (f[i+a]=false) then sb(i+a);
        end;
        if (i+b<=t) then
        begin
                ans:=max(ans,i+b);
                if (ans=t) then
                begin
                        writeln(t);
                        {close(input);
                        close(output);  }
                        halt;
                end;
                if (f[i+b]=false) then sb(i+b);
        end;
        if (p=false) and (f[i div 2]=false) then
        begin
                p:=true;
                sb(i div 2);
                p:=false;
        end;
end;
begin
        {assign(input,'fruit.in');reset(input);
        assign(output,'fruit.out');rewrite(output); }
        readln(t,a,b);
        if (t=a) or (t=b) or (t mod a=0) or (t mod b=0) or (t mod (a+b)=0) or (t=(a div 2+b)) or (t=(b div 2+a)) then
        begin
                writeln(t);
                close(input);
                close(output);
                halt;
        end;
        sb(0);
        writeln(ans);
        {close(input);
        close(output); }
end.