integer sum
Sum=0
Do 7 i=1,99,2
Sum=sum+i
7 continue
Print*,'sum=', sum
STOP
end
ICAgICAgICAgaW50ZWdlciBzdW0KICAgICAgICAgU3VtPTAKICAgICAgICAgRG8gNyBpPTEsOTksMgogICAgICAgICBTdW09c3VtK2kKICAgNyAgICAgY29udGludWUgCiAgICAgICAgIFByaW50Kiwnc3VtPScsIHN1bQogICAgICAgICBTVE9QIAogICAgICAgICBlbmQ=