Fortran 77: Three nested loop write to screen

Program Nested_Loops

Implicit None

Integer a,b,n,output

Do a=1,3

Do b=1,4

Do n=a+b

End Do

Write(*,*) 'a=',a,'b=',b,'output=n',output

End Do

End Do

End Program