PascalABC.NET Задача "Модули"

ЕСЛИ НЕ ЗНАЕТЕ PascalABC.NET НЕ ТРАТЬТЕ И МОЕ И СВОЕ ВРЕМЯ. Нейронка, кстати, тут бессильна, спешу разочаровать:)

Задание:

Разработать программу для обработки двух или трёх матриц разного размера с использованием процедур и функций, реализованных в отдельном модуле (вариант №8 - описан снизу). Необходимо выбрать подходящий тип подпрограмм – процедура или функция, для ввода и вывода матриц использовать процедуры.

Ввод всех данных осуществляется из файла, вывод – в файл. Для передачи имён файлов должны использоваться параметры программы. Для каждой матрицы использовать своё заданное значение. При транспонировании и других изменениях новых матриц не создавать.

Вариант 8:

В каждой из трёх матриц определить для каждой строки (сформировать массив) среднее арифметическое элементов, больших заданного значения. Затем для всех матриц разделить каждый элемент матрицы на вычисленное среднее арифметическое элементов, больших заданного значения, той же строки.

вот здесь пример выполнения схожей программы другого варианта:

https://natalia.appmat.ru/delphi/term1/Task_Units-Description.html

к данной задаче нужно будет только еще блок-схему. Одна - основная, где включены подзадачи, но вот сами подзадачи описываются в отдельных блок-схемах (каждая подзадача, которая присутствует = отдельная блок-схема к ней). Также, условия к блок-схемам: надо писать сами действия, а не их описание, т.е. "n := 0", а не "присвоить 0 в n". Также, цикл while - это цикл с предусловием, то есть надо разбираться, где циклы с постусловием, а где с предусловием.