<Example Program>
Program end_do_example
Integer :: i,x
x = 0
Do i = 1, 6, 2
x = x + i
End Do
Print *, x
End
Execution Results
9
Execution Results Execution Results