Recent content by mike81

  1. M

    Comp Sci Fortran program to calculate texas hold em odds

    Sorry I probably should have just posted the question. Here it is, (3) Time to win at Texas Hold-em. You are getting two cards. It could be a pair (5.9% chance), it could be suited (23.5%, good for flush prospects), it could be unsuited and unpaired (70.6%). At this stage, before ‘the flop’: •...
  2. M

    Comp Sci Fortran program to calculate texas hold em odds

    The instructions are to calculate the odds of winning if you are dealt King and 9 of clubs, what are the odds of winning? I am finding myself spending more time trying to figure out texas hold em (never played before) than writing the program. So far I found a list on wiki that breaks down the...
  3. M

    Fortran Quadratic fortran program help

    Made the changes you suggested except I left b**2 as is since he taught it that way in class. I really appreciate the help. I am sure I will posting our last program, its going to be a nightmare. He wrote a file with 1.4 million letters that are dna markers (4 letters in groups of 3). We have to...
  4. M

    Fortran Quadratic fortran program help

    I think I got it, thanks a lot for the help. Program Quad Implicit None Real Root1,Root2,a,b,c,discrim,r1,ri,root 2 Write (*,*) 'Enter 3 numbers' Read (*,*) a,b,c discrim=b**2-(4*a*c) If (discrim.lt.0) Then discrim=-discrim...
  5. M

    Fortran Quadratic fortran program help

    When I say they don't print out correctly I mean that it always writes, for complex (somenumber, 0). No matter what the second number is always zero. I see what your saying Mark, I could have used discri but initially just used it to have the program use either real or complex numbers. I am...
  6. M

    Fortran Quadratic fortran program help

    I am trying to write this program, it runs fine but I can't get the imaginary numbers to print correctly. I have been trying this for a few hours now and can't figure it out. Here is the code, I am running Force 2.0. Thanks in advance for the help. Program Quad Implicit None...
Back
Top