Собственно чтобы представить число в двоичную систему счисления, необходимо разделить его на максимально целую часть, которая при умножении на 2 давала нам ближайшее значение к этому числу. Т.е.
число 243: если мы умножим 121 на 2: 121*2=242;Т.е. 121 умноженное на 2 и есть ближайшее число к 243, но им не является, т.к. остаток 1, мы записываем его ниже и делим число дальше. Вспоминаем деление столбиком и высчитываем (во вложении). Также, есть более быстрое и продуктивное высчитывание (во вложении). В обоих решениях выписывание остатков происходит в обратном порядке для верного ответа.
//PascalABC.NET 3.1 сборка 1200
begin
repeat
var n := Random(1000);
if n mod (5 * 7) = 0 then begin
write(n);
Readln;
end
until false;
end.
SELECT * FROM "Зоопарк" WHERE "количестве пищи в день" BETWEEN 5 and 10