подпрограмма для вычислений в десятичной системе с учётом порядков