Unnamed repository; edit this file 'description' to name the repository.
1
2
3
4
5
6
7
8
program main
    integer :: i
    do i = 1, 10
        if (i > 5) then
            print *, i
        end if
    end do
end program main