напишите процедуру digits, которая заполняет массив из n элементов цифрами десятичной записи натурального числа x.

в 0-ой элемент массива необходимо записать цифру 0-го разряда десятичной записи числа х.
в 1-ый элемент массива необходимо записать цифру 1-го разряда десятичной записи числа х.

в (n-1)-ый элемент массива необходимо записать цифру (n-1)-го разряда десятичной записи числа х.

размер массива заранее задан константой n. используйте заголовок:

procedure digits(x: longint; var m: tmas);
тип тmas задан как array[0..n - 1] of longint и может использоваться для описания параметров подпрограмм.

MoriYuka    3   02.10.2019 22:14    39