Compter le nombre de carrés parfaits dans une sous-barre

Question

Une séquence est bonne si le bit et de tous ses éléments est un carré parfait.

Donc, compter le nombre de "bonnes" séquences, dans un sous-réseau.
Par exemple: dans [1, 2, 3
Il y a 6 sous-séquences:

Il y a donc 3 "bonnes" séquences
Pouvez-vous suggérer une approche efficace pour les compter?