Сделать по точкам типо сместиться в точку и тд сразу 2 рисунка 30 ​

// pascalabc.net 3.3, сборка 1579 от 18.11.2017 // внимание! если программа не работает, обновите версию! begin   writeln('*** исходный массив ***');   var a: =matrrandom(2,4,-10,30);   a.println(4); writeln(4*a.colcount*'-');   writeln('п = ',a.elementsbyrow.where(t-> t.between(1,19))           .aggregate(1,(x,y)-> x*y)) end. пример *** исходный массив ***   24  16  22  12     2    5    1    8 п = 15360

14/2=7(0)

7/2=3(1)

3/2=1(1)

1/2=0(1)ответ 1110 в двоичной системе

 

14/8=1(6)

6/8=0(1) ответ 16

 

14/16=0(1) ответ 1

 

65/2=32(1)

32/2=16(0)

16/2=8(0)

8/2=4(0)

4/2=2(0)

2/2=1(0)

1/2=0(1) ответ 1000001в двоичной системе

 

65/8=8(1)

8/8=1(0)

1/8=0(1) ответ 101 в восьмеричной системе

 

 65/16=4(1)

4/16=0(1)ответ "В"

 

Из правил сервиса: "Пользователи признают, что задания, которые содержат большое количество задач, требующих решения, должны быть разделены на два или несколько заданий и в таком виде добавлены в Сервис для других Пользователей. То есть в одном задании не может быть несколько задач".