{ввести числа}

t_all := X * T; {Столы во всех кабинетах}
c_all := X * C; {Стулья во всех кабинетах}

for i := 1 to X do
    begin
        {Делим на 2 т.к. стулья и столы можно ставить один на другой}
        t_cur := (i * N) div 2; {Столы, которые находятся в i кабинетах}
        c_cur := (i * M) div 2; {Стулья, которые находятся в i кабинетах}

        {Если делится с остатком, то добавляем ещё один стул}
        if t_cur mod 2 then t_cur := t_cur + 1;
        if c_cur mod 2 then c_cur := c_cur + 1;

        if t_cur > t_all or c_cur > c_all then
            break; {Кол-во стульев или столов из i кабинетов больше, чем может поместиться в i коридорах}
    end;

if i = X then
    WriteLn('ALL')
else
    WriteLn(i);