program main integer :: i do i = 1, 10 if (i > 5) then print *, i end if end do end program main