Identify the three basic parts in the loops below:
Dim intLoop as Integer Dim intTriangle as Integer Dim intFactorial as Integer intLoop = 1 Do 'as a post-test 'this loop will calculate the triangle value of a number ' and the factorial value of a number intTriangle = intTriangle + intLoop intFactorial =intFactorial * intLoop intLoop = intLoop + 1 Loop While intLoop <= intNumber intLoop = 1 Do While intLoop <= intNumber 'as a pre-test 'this loop will calculate the triangle value of a number ' and the factorial value of a number intTriangle = intTriangle + intLoop intFactorial =intFactorial * intLoop intLoop = intLoop + 1 Loop