again nlo nhi =
    do
        putStrLn("n = "++show(nlo))
        if nlo == nhi
            then putStr ""
            else again (nlo+1) nhi

main = again 1 10