zliczanie wszystkich trójek liczb

Musze napisać program który zlicza wszystkie trojki liczb(x,y,z), ktore spełniaja rowność xx+yy=z*z, gdzie x,y,z naleza do zbioru liczb {1...10}. Ktoś moze mi pomóc ?

for x=1, x <=10
 for y=1, y <= 10
  for z=1, z <= 10
   if (x*x  + y*y = z*z)
    ilosc_trojek++;

?

@lopuszanin może jakaś biblioteka do constraint programmingu? :)

thx za pomoc