Составить программу для обработки массивов с разным количеством элементов. Паскаль.

[gudok2]

Размерность массива следует задать именуемыми константами. Все необходимые данные должны
передаваться подпрограммам в качестве параметров; все величины,
используемых внутри
подпрограмм, должны быть описаны как локальные. Использование глобальных переменных в подпрограммах
не допускается. Вывод результатов работы подпрограмм должен выполняться в главной
программе.
В подразделе Y есть 15 сотрудников, а в G-20. В течение месяца они отработали некоторое количество дней, заданная как случайная величина со значением и Yn = random (31), n ​​= 1 .. 15 Gk = random (31), k = 1 .. 20. Дневная оплата труда d у.е. Налоговая ставка 20%. Используя подпрограммы создать массивы
Y, G, вывести значение их элементов на экран и выполнить задачу поиска данных для каждого подразделения. Вывести сообщение, если искомых данных нет. Сколько человек работали менее 10 дней? Заранее спасибо

[Serge_Bliznykov]

задачка очень несложная.
Вы сами что-то делать собираетесь? Или, как обычно, будете ждать "манны небесной" в виде готового кода?