For a = 1 To 100 For b = 1 To 100 For c = 1 To 100 If a ^ 2