統計計算語言 07/07 程式碼

[markoo (被釋放抑或自解脫?)]

同學們，這是今天上課兩個Example的程式碼(VC環境下使用)
只要稍微修改一下應該就可以再Visual Studio上使用了。

Ex 1.找因子
#include <stdio.h>
#define sum 176
#define MAX(a,b) (a>=b)?a:b
main()
{
int A=1,a,b,c;
a=A*(sum-A);
for (A=2;A<176;A++)
{
 b=A*(sum-A);
 a=MAX(a,b);
}
printf("The max of A*B is %d\n",a);
}

Ex 2. Full house的機率

#include <stdio.h>
#include <math.h>
#include <time.h>
#define Max(a,b) (a>b)?a:b
int imul(int);
int igam(int,int);

main()
{

    double m,n,p;
    m=igam(5,2)*igam(13,1)*igam(4,2)*igam(12,1)*igam(4,3);
    n=igam(52,5);
    p=m/n;
    printf("The prob. of the fullhouse is %f\n",p);

}

int igam(int n,int c)
{
    int i,t=1,ans=1;
    int m;
    m=Max(c,n-c);
    for (i=m+1;i<=n;i++)
    {
        t=t*i;
    }
    ans=t/imul(n-m);
        return ans;
}
int imul(int s)
{
    int i,ans=1;
    for (i=1;i<=s;i++)
    ans=ans*i;
    return ans;
}

--
※ 發信站: 批踢踢實業坊(ptt.cc) 
◆ From: 118.166.51.38
推 ninaro      :辛苦了~感謝感謝!!!
推 smallvc     :非常需要！～感謝
推 newH2O      :感謝!!
推 karlinmilk  :太棒了!!極為需要!感恩!!
推 Z6          :感謝^^
推 wanting0605 :覺得分子好像不用乘igam(5,2)耶..~"~
推 missergirl  :應該沒有C5取2吧@@" 我累個很大~