永发信息网

求出一批非零整数中的偶数.奇数的平均值,用零作为终止标记的程序

答案:2  悬赏:0  手机版
解决时间 2021-02-13 14:37
求出一批非零整数中的偶数.奇数的平均值,用零作为终止标记的程序
最佳答案
'一个VB程序 实例代码如下:
Private a() As Integer

Private Sub Form_Click()
Do
b = b + 1
ReDim Preserve a(1 To b) As Integer
a(b) = InputBox("请输入一个整数:")
If a(b) = 0 Then
ReDim Preserve a(1 To b - 1) As Integer
Exit Do
End If
Print a(b); " ";
c = c + 1
If c Mod 10 = 0 Then Print
If a(b) Mod 2 <> 0 Then
js1 = js1 + a(b)
js2 = js2 + 1
Else
os1 = os1 + a(b)
os2 = os2 + 1
End If
Loop
Print
Print "奇数的平均值是:" & js1 / js2
Print "偶数的平均值是:" & os1 / os2
End Sub
全部回答

#include<stdio.h>

int main() {

int a,s1=0,s2=0,c1=0,c2=0;

scanf("%d", &a);

while(a != 0) {

if(a%2==0) {

s1 += a;

c1++;

} else {

s2 += a;

c2++;

}

scanf("%d", &a);

}

printf("%f %f", (float)s1/c1, (float)s2/c2);

return 0;

}

我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
如何获得request中的全部参数
新鑫电脑地址有知道的么?有点事想过去
翰侨图文怎么去啊,有知道地址的么
女人两天内做了10次爱正常吗?
有多少打算考研的 有没有打算报复旦的
二手电脑怎么去啊,我要去那办事
根据《证券投资基金运作管理办法》的规定,封
万人坑读后感600字作文。 。。。。。求答
货站北街23号院在什么地方啊,我要过去处理事
长时间喝过期的复原乳会怎么样
1千万亿节等于多少g?
用三种不同方法把等边三角形平均分成三份,图
乾安惠民村镇银行镇西支行怎么去啊,有知道地
车里有嗡嗡响怎么回事,有没有好心的车友帮帮
下述哪类建筑应设消防电梯?[1995-107]A.11
推荐资讯
保定市唐县是山区吗
我用手机号申请了两个微信号,可第一个怎么也
康仁泰大药房在哪里啊,我有事要去这个地方
国威手机电脑(府苑小区(国威科技))(府苑
壁挂炉水温升的快,在线急等
淳安机关幼儿园2016年招生时间
潍坊锦利程环保设备有限公司我想知道这个在什
小米手机的照片在网上怎么能看到
信宜市消费者委员会城南分会我想知道这个在什
中国电信彭城营业厅地址在哪,我要去那里办事
祁阳县七里桥派出所在哪里啊,我有事要去这个
我比较内向,每次面试都感觉自己表现不好,怎
正方形一边上任一点到这个正方形两条对角线的
阴历怎么看 ?