Vb编写程序，随机生成 10 个[1，100]的整数，输出其平均值及大于平均值的数。

Private Sub Command1_Click()   '生成10-100间10个数字求平均值及大伍圆拿于平均值腔搭的数字

Me.Cls

Dim a() As Integer, i As Integer, he As Integer

Dim pj As Single

ProduceShu 10, 100, 10, a()

Print "生成的10个数字分别为：" &Space(2)

For i = 0 To 9

Print a(i)

he = he + a(i)

Next i

pj = he / 10

Print: Print "平均值为：" &Space(2)

Print Format(pj, "腔州0.00"): Print "大于平均值的数字为" &Space(2)

For i = 0 To 9

If a(i) >pj Then

Print a(i)

End If

Next i

End Sub

Private Function ProduceShu(ByVal m As Integer, ByVal n As Integer, _

ByVal num As Integer, a() As Integer) As Integer   '生成10个数字

Dim i As Integer

ReDim a(num)

For i = 0 To num - 1

Randomize

a(i) = Int((n - m + 1) * Rnd + m)

Next i

End Function

#include<stdio.h>

#define max 5 /*设定要输入成绩的学生个数*/

double zpj /*总平均值*/

struct student /*结构体*/

{

int num

char name[10]

int score1

int score2

int score3

double pj

}

struct student stu[max],temp

void Input() /*输入函数*/神袜

{ int i

for(i=0i<maxi++)

{printf("enter number")

scanf("%d",&stu[i].num)

printf("enter name")

scanf("%s",&stu[i].name)

printf("enter score1")

scanf("%d",&stu[i].score1)

printf("enter score2")

scanf("%d",&stu[i].score2)

printf("enter score3")

scanf("%d",&stu[i].score3)

}

}

average() /谨芹*求平均值函数*/

{int i

for(i=0i<5i++)

{stu[i].pj=stu[i].score1+stu[i].score1+stu[i].score3

zpj+=stu[i].pj

}

for(i=0i<5i++)

stu[i].pj/=3

zpj/=max

}

MAX() /*找出最高平均值的学生的函数*/

{int i,j

temp=stu[0]

for(i=0i<max-1i++)

for(j=i+1j<maxj++)

if(stu[i].pj<stu[j].pj)

temp=stu[j]

}

output() /*输出函数*/

{int i

for(i=0i<maxi++)

printf("num=%d\n name=%s\n score1=%d\nscore2=%d\n score3=%d\naver=%f\n",

stu[i].num,stu[i].name,stu[i].score1,stu[i].score2,stu[i].score3,stu[i].pj)

printf("总平均分=%f\n\n",zpj)

printf("平均分最高的学生\nnum=%d\n name=%s\游晌激n score1=%d\n score2=%d\n score3=%d\n aver=%f\n",

temp.num,temp.name,temp.score1,temp.score2,temp.score3,temp.pj)

}

void main() /*主函数*/

{

Input()

average()

MAX()

output()

}

自己写的 符合你的要求

不足之处还请指教

平面设计、3D模型、音视频剪辑。

这些都是很好用的PJ软件，可以在某度上查找这些软件，搜索到软件以后，查看一下安装教程，然后自行安装下载。

pj软件应用程序是一个软件程序员，开发者和被俗称为QRDesigner软件的开发，主要集中在办公设计制作方面，如常见的OFFICE软件等。

---