Под константой будем понимать целое число, убирающееся в одну ячейку памяти. Операция умножения числа многократной точности на константу сводится к просмотру списка и выполнения операции над разрядами. В приведенной программе MultCnst произведение Prod числа M на константу C формируется в новом списке. При вычислений произведений разрядов числа на константу считаем, что переполнение не происходит.
Procedure MultCnst(Prod,M,C)
Begin
SetEmpty(Prod)
if M 
nil then {t:=M.last;
Repeat
t:=t^.next;AddToEnd(Prod,C*t^.info)
until t=M.last;
norm(Prod)}
End
Трудоемкость операции умножения пропорциональна длине числа.
Аналогично производится деление числа многократной точности на константу. Единственно, перед делением число удобно записать в обратном порядке. В приведенной ниже программе число M делим на константу C получаем частное (новый список) Part и остаток rest, являющийся константой.
