Сделать для одромерного массива сумму чётных и произведение нечётных и тоже самое для двухмерного массива программа паскаль ​

Алгори́тм (лат. algorithmi — от имени среднеазиатского математика Аль-Хорезми[1]) — конечная совокупность точно заданных правил решения некоторого класса задач или набор инструкций, описывающих порядок действий исполнителя для решения определённой задачи. В старой трактовке вместо слова «порядок» использовалось слово «последовательность», но по мере развития параллельности в работе компьютеров слово «последовательность» стали заменять более общим словом «порядок». Независимые инструкции могут выполняться в произвольном порядке, параллельно, если это позволяют используемые исполнители.

import turtle

t = turtle.Pen()

t.speed(0)

t.fillcolor("orange")

t.begin_fill()

for i in range(4):

   t.fd(150)

   t.left(90)

t.end_fill()

t.left(90)

t.fd(150)

t.right(45)

t.fillcolor('brown')

t.begin_fill()

t.fd(106)

t.right(90)

t.fd(106)

t.end_fill()

t.up()

t.right(135)

t.fd(50)

t.left(90)

t.fd(50)

t.down()

t.fillcolor("grey")

for n in range(4):

   t.begin_fill()

   for i in range(4):

       t.fd(25)

       t.right(90)

   t.end_fill()

   t.fd(50)

   t.right(90)

t.hideturtle()

turtle.mainloop()