亂數問題~ |
|
693236305
一般會員 發表:1 回覆:2 積分:0 註冊:2007-03-08 發送簡訊給我 |
#include
#include #include void main() { srand(time(NULL)); int num[45],orz,a=45,b,score,number,star; for(orz=0 ; orz<45 ; orz ) { num[orz] = rand()%9 91; //取91~99亂數 } printf( "score\t frequency\t bar cheat\t" ); for(score=91 ; score<100 ; score ) { number=0; for(b=0 ; b if(num[b]==score) //亂數等於數字時,number要向上 1 number=number 1; printf( "\n=\t =\t\t",score,number ); for(star=0 ; star printf("*"); printf("\n"); } 若是用這個要取~眾數、平均值、中位數、低標、高標 要如何設計?? } |
taishyang
站務副站長 發表:377 回覆:5490 積分:4563 註冊:2002-10-08 發送簡訊給我 |
|
pcboy
版主 發表:177 回覆:1838 積分:1463 註冊:2004-01-13 發送簡訊給我 |
這是 BCB 討論區, 先寫個 "眾數" 給您參考, 其他自己寫看看, 有問題貼出程式碼再套論
<textarea class="cpp" rows="10" cols="60" name="code"> void __fastcall TForm1::FormCreate(TObject *Sender) { srand(time(NULL)); Memo1->Clear(); int i, num[45],orz,a=45,b,number,star; int score[100]; //眾數,是指所觀察數列中出現次數最多的那一個數值 //中位數,首先將此數列由小到大排列,如果 n是奇數,依序排列後第(n 1)/2 個數即為此數列之中位數,如果 n 為偶數,則取(n 1)/2前後兩個數的平均值為中位數 //高標,前百分之五十之平均 //均標,全體之平均 //低標,後百分之五十之平均 // ------------------------------------------------------------------------- Memo1->Lines->Add("45個數值分別為"); for(i=0 ; i<=100 ; i ) { score[i]=0; } for(orz=0 ; orz<45 ; orz ) { num[orz] = rand()%9 91; //取91~99亂數 Memo1->Lines->Add(num[orz]); score[num[orz]] = score[num[orz]] 1; } // ------------------------------------------------------------------------ Memo1->Lines->Add("眾數,是指所觀察數列中出現次數最多的那一個數值"); int maxcount = 0; int maxval = 0; for(i=91 ; i<=99 ; i ) { Memo1->Lines->Add(IntToStr(i) " : " IntToStr(score[i])); if (score[i]> maxcount) { maxcount = score[i]; maxval = i; // Memo1->Lines->Add("--" IntToStr(maxval) " : " IntToStr(maxcount)); // 驗證比較情況 } } Memo1->Lines->Add("眾數 : " IntToStr(maxval)); } </textarea>
------
能力不足,求助於人;有能力時,幫幫別人;如果您滿意答覆,請適時結案! 子曰:問有三種,不懂則問,雖懂有疑則問,雖懂而想知更多則問! |
693236305
一般會員 發表:1 回覆:2 積分:0 註冊:2007-03-08 發送簡訊給我 |
|
693236305
一般會員 發表:1 回覆:2 積分:0 註冊:2007-03-08 發送簡訊給我 |
|
pcboy
版主 發表:177 回覆:1838 積分:1463 註冊:2004-01-13 發送簡訊給我 |
先決您要用哪套開發工具 ? Delphi ? C ? 版本 ?
您的程式碼也很奇怪啊 ~ #include 後面沒東西 下面兩個程式碼都斷了 for(b=0 ; b for(star=0 ; star 好像從哪裡 copy 來的, 只是對方網站可能有防拷貝措施, 部份程式碼變成圖型無法拷貝 這是作業 ? 為了避免學生偷懶不寫作業, 直接問答案 如非您自己寫程式碼貼出來討論, 站上的人幾乎都不太會回答您的問題 (其實這幾題很簡單) 先自己寫看看
------
能力不足,求助於人;有能力時,幫幫別人;如果您滿意答覆,請適時結案! 子曰:問有三種,不懂則問,雖懂有疑則問,雖懂而想知更多則問! |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |