S čím přesně si nevíš rady? Objektový pascal a java má úplně jiný přístup. V pascalu moc neumím, takže nedokážu posoudit ten kód, ale v javě jde na tohle suprově použít lambda funkce. Naprogramuješ to zhruba na 5 řádků. Pokud máš problém s porozuměním kódu a jak to naprogramovat, tak si projdi nějaké jednoduché příklady na algoritmizaci a zkoušej, zkoušej a zase zkoušej.