1樓:浮標
我幫你寫好了:
dim a(1000) as double, rs as longprivate sub command1_click()a(rs) = val(text1.text)rs = rs + 1
label2.caption = "總人數有:" & rsend sub
private sub command2_click()dim l as integer, b as double, c as double, d as double, e as double, f as double
b = 0
for l = 0 to rs '取出最大值if b < a(l) then b = a(l)next
c = 100
for l = 0 to rs '取出最小值if c > a(l) then c = a(l)next
for l = 0 to rs '將所有數相加d = d + a(l)
next
for l = 0 to rs '不及格人數統計if a(l) < 60 then e = e + 1next
f = rs - e
d = d / rs '算出平均值
label2.caption = "總人數有:" & rs & "平均分:
" & round(d, 2) & "最高分:" & b & "最低分" & c & "及格人數:" & f & "不及格人數:
" & e
'msgbox "平均分保留小數2位:" & round(d, 2)end sub
c語言:輸入n個學生成績,計算平均成績(保留兩位小數),並統計不及格人數
c語言編:輸入某班學生某門課的成績,統計平均分,最高分和不及格人數
2樓:聽不清啊
#include
int main()
{int x,n=0,max=0,min=999,fail=0,sum=0,a[100];
while(1)
{scanf("%d",&x);
if(x<0)break;
a[n++]=x;
sum+=x;
if(x>max)max=x;
else if(xif(x<60)fail++;
printf("最高分=%d\n",max);
printf("最低分=%d\n",min);
printf("不及格人數=%d\n",fail);
printf("平均分=%.2f\n",(float)sum/n);
return 0;
c語言,輸入10個同學的成績,統計80分以上和不及格的人數,並輸出平均值,如何編寫?
編寫程式實現從鍵盤輸入若干學生某門課的成績,計算平均成績並統計90分及以上人數,直到輸入負數結束
3樓:資料**
#include
int main()
}if(chengji<0)
}return 0;}
vb程式設計建立應用程式用select語句計算分段
select case 語句,根據表示式的值,來決定執行幾組語句中的其中之一。select case 語句示例 本示例使用 select case 語句來判斷變數的值。示例中第二個 case 子句包含了變數值,故只有此區塊內的語句會被完成到。dim number number 8 設定變數初值。se...
使用者用vb編寫程式 輸入年份和月份,程式能夠判斷其是否是閏年,那個季節,這個月多少天
將以下內容復到記事本中 然後 儲存為 form1.frm version 5.00 begin vb.form form1 caption form1 clientheight 4830 clientleft 60 clienttop 450 clientwidth 8325 linktopic f...
vb開發資料庫應用程式的步驟和方法
1.設計好資料庫表 2.設計好程式功能,也就是你需要對你程式要實現的功能有個很好的了解,不能說邊開發邊想,這種方法並不適合大多數人 3.將 模組化,比如 連線資料的 可以放在乙個模組中,資料庫操作 查詢 刪除等等 放在另乙個模組中,介面的基本操作可以放在另乙個模組中,這樣做的好處在於好維護 以及後期...