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