Это конечно же ноль (если не брать отрицательные числа)
Взвесить с одной стороны 2 и с другой, с какой стороны легче взвешивать Ещё раз с одной стороны 1 и с другой какая сторона легче та монета фальшивая
Можно переписать так:
Х≥ 6 + (Х<5)*(X≥4) = 0
1) X=7 не подходит, так как X≥6 =1
2) X=6 не походит, так как Х≥6=1
3) Х<5 не подходит , так как (X<5)*(X>=4) =1
4) Х=4 Х≥6 =0 и (Х<5)*(X≥4) =0 - подходит
Ответ 4) 4
<em>// PascalABC.NET 3.3, сборка 1590 от 03.12.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var (a,b):=ReadInteger2('Введите два числа');
if a>b then Swap(a,b);
Range(a,b).Select(x->x*x).Println
end.
<u>Пример</u>
Введите два числа 29 6
36 49 64 81 100 121 144 169 196 225 256 289 324 361 400 441 484 529 576 625 676 729 784 841