В электронной таблице в ячейке D2 есть формула=B$2*C2.Какая формула будет для ячейки очень нужно​

Var
    N, a1, a2, a3, min, max: integer;
begin
    readln(N);
    N := abs(N);
    a1 := N mod 10; //в а1 хранится разряд единиц введённого числа
    N := N div 10;     //"стираем" в N последнюю цифру
    a2 := N mod 10; //в а2 хранится рязряд десятков числа N
    N := N div 10;
    a3 := N mod 10; //в а3 хранится рязряд сотен числа N
    //
//поиск минимума из цифр. в переменной мин
//хранится наименьшее число на данном шаге.
    min := a1;          
    if a2 < min then
        min := a2;
    if a3 < min then
        min := a3;
   //
//поиск максимума
    max := a1;
    if a2 > max then
        max := a2;
    if a3 > max then
        max := a3;
    //
    writeln('min - ', min, ' max - ', max);
end.

1) 19(10) - 10011(2)
2) 86(10) - 1010110(2)
3) 177(10) - 10110001(2)
4) 345(10) - 101011001(2)

Для числа [19]

Ход решения:
Делим число на 2 и выписываем остатки
19 = 9·2 + 1
9 = 4·2 + 1
4 = 2·2 + 0
2 = 1·2 + 0
Последний множитель перед 2 равный 1 записываем первым.
Затем записываем найденные остатки в обратном порядке.
Получаем: 10011

Для числа [86]

Ход решения:
Делим число на 2 и выписываем остатки
86 = 43·2 + 0
43 = 21·2 + 1
21 = 10·2 + 1
10 = 5·2 + 0
5 = 2·2 + 1
2 = 1·2 + 0
Последний множитель перед 2 равный 1 записываем первым.
Затем записываем найденные остатки в обратном порядке.
Получаем: 1010110

Для числа [177]

Ход решения:
Делим число на 2 и выписываем остатки
177 = 88·2 + 1
88 = 44·2 + 0
44 = 22·2 + 0
22 = 11·2 + 0
11 = 5·2 + 1
5 = 2·2 + 1
2 = 1·2 + 0
Последний множитель перед 2 равный 1 записываем первым.
Затем записываем найденные остатки в обратном порядке.
Получаем: 10110001

Для числа [345]

Ход решения:
Делим число на 2 и выписываем остатки
345 = 172·2 + 1
172 = 86·2 + 0
86 = 43·2 + 0
43 = 21·2 + 1
21 = 10·2 + 1
10 = 5·2 + 0
5 = 2·2 + 1
2 = 1·2 + 0
Последний множитель перед 2 равный 1 записываем первым.
Затем записываем найденные остатки в обратном порядке.
Получаем: 101011001