what can be the answer to this QBasic problem: To print the sum of suares of even no from 10 to 30 in reverse order with flowchart using msword

Question

Need help to solve the above question ASAP

Answer 1

Dim total As Long

total = 0

For iLoop = 30 To 10 Step -2

total = total + iLoop * iLoop

Next iLoop

print Total