Pascal - wyświetlanie tekstu w określonej kolejności

Witam mam taki problem estetyczny mianowicie:




ów procedure drukuje liste w postaci

i było by dobrze gdyby nie fakt ze kazdy pojazd pod dana marka drukuje tak samo
a chciałbym żeby wyswietlał w jednej marce wszystkie pojazdy czyli np



Czy mógłby ktos przerobić ten kod albo chociaż naprowadzić mnie na rozwiązanie
Z góry dziękuję i pilnie oczekuję odpowiedzi:)

Sproboj tego

Nie ten fragment nawet nie ma sensu ? dlaczego bo ja mam tam wszystko w pętlach i jak chce ustawić inaczej petla (zapętla się cała lista)