Pas - это запись (record) из двух полей nmb - количество вещей и weit - вес вещей, эта запись для каждого отдельного пассажира, а чтобы хранить сведения о всех пассажирах и создается массив записей Pas. Запись setlength(Bagaj,n) устанавливает длину массива равной n элементов, так как заранее количество пассажиров не известно, число пассажиров запрашивается от пользователя, число n. Это называется - динамические массивы.