Pascal-t sosem használtam, szóval nem tudom, hogy mire képes és mire nem. Úgy hogy leírok egy lehetséges, de nem feltétlenül legjobb megoldást.
Beolvasás után létrehozol egy akkora tömböt, ami a két bemenet tömb méretének az összege (ha pl. az első bemenet 2 elemű, a második 5, akkor egy 7 elemű tömböt hozol létre, ennél nagyobb tömb biztos nem kell).
Ha feltételezhetjük, hogy egy bemeneten belül nem szerepelhet kétszer ugyanaz az ásvány (vagyis nem lehet ilyen: andezit andezit andezit), akkor az első bemenetet egy az egyben az általunk létrehozott nagyobb tömbbe másoljuk. A második menet elemét pedig csak utána másoljuk át, ha előtte megnéztük, hogy nincs-e benne az az elem. Vagyis egy for ciklussal végig mész a korábbi elemeken (igazából elég csak azokon az elemeken végigmenni, amik az első tömbből kerültek be).
Esetleg egy külön változóval számon is tarthatod, hogy a nagy tömbben hány helyet használsz fel, így könnyebb végigmenni rajta, illetve kiiratni.

A dinamikus memóriakezelés lenne egy másik lehetőség, de lehet, hogy nem éri meg vele szívni, illetve nem is tudom, hogy pascal-ban milyen.