Помогите задачку сделать на VB

Дано натуральное число n. Получить все пифагоровы тройки натуральных чисел, каждое из которых не превосходит n, т.е. все такие тройки натуральных чисел a, b, c, что a2+b2+c2+n2 (a<или=b<или=c<или=n).
2-это квадрат.