【填空题】程序功能：求一维数组元素最大值序 [图]...

下面函数的功能是：找出一维数组元素中最大的值和它所在的下标，最大值的和它所在的下标通过形参传回。数组元素中的值已在主函数中赋予。主函数中x是数组名，n是x中的数据个数，max存放最大值，index存放最大值所在元素的下标。请填空。

#include<stdlib.h>

#include<stdio.h>

void fun（int a［］,int n, int *max, int *d）

{ int i;

*max=a［0］;

*d=0;

for（i=0;【15】;i++）

if（*max<【16】）

{*max=a［i］;*d=i;}

}

main（）

{ int i, x［20］, max, index, n=10;

randomize（）;

for（i=0;i<n;i++）

{

x［i］=rand（）%50; printf（"%4d",x［i］）;

}

printf（"＼n"）;

fun（x,n,&max,&index）;

printf（"Max=%5d,Index=%4d＼n",max,index）;

}

下面函数的功能是:找出一维数组元素中最大的值和它所在的下标,最大的值和它所在的下标通过形参传回。数组元素中的值已在主函数中赋予。主函数中x是数组名,n是x中的数据个数,max存放最大值,index存放最大值所在元素的下标。请填空。 include<stdlib.h> include<stdio.h> void fun(int a[],int n, int *max, int *d) { int I; *max=a[0]; *d=0; for(I=0;【 】;I++) if(*max<【 】) {*max=a[I];*d=i;} } main() { int i, x[20], max, index, n=10; randomize(); for(i=0;i<n;i++) { x[i]=rand()%50; printf("%4d",x[i]); } printf("\n"); fun(x,n,&max,&index); printf("Max=%5d,Index=%4d\n",max,index);}

请编写一个函数fun()，它的功能是：找出一维数组元素中最大的值和它所在的下标，最大值和它所在的下标通过形参传回。数组元素中的值已在主函数中赋予。

主函数中x是数组名，n是x中的数据个数，max存放最大值，index存放最大值所在元素的下标。

注意：部分源程序给出如下。

请勿改动主函数main和其他函数中的任何内容，仅在函数fun的花括号中填入所编写的若干语句。

试题程序：

include＜stdlib.h＞

include＜stdio.h＞

void fun(int a[]，int n, int *max，int *d)

{

}

main()

{

int i, x[20], max, index, n=10;

randomize();

for(i=0; i＜=n; i++)

{

x[i]=rand()%50;

printf("%4d",x[i]);

/*输出一个随机数组*/

}

printf("\n");

fun(x,n,&max,&index);

printf("Max=%5d，Index=%4d\n"，max,index);

}

下面函数的功能是找出一维数组元素中最大的值和它所在的下标，最大值的和它所在的下标通过形参传回。#include <stdlib.h>#include <stdio.h>void fun(int a［ ］,int n,int *max,int *d){ int i; *max=a［0］; *d=0; for(i=0;;i++) if(*max<) { *max=a［i］;*d=i; }}

（ 9 ）以下程序的功能是：将一维数组 A 中的 100 个元素分别赋给二维数组 B 的每个元素并打印出来，要

求把 A(1) 到 A(10) 依次赋给 B(1,1) 到 B(1,10) ，把 A(11) 到 A(20) 依次赋给 B(2,1) 到 B(2,10) ， …… ， 把

A(91) 到 A(100) 依次赋给 B(10,1) 到 B(10,10) 。请填空。

Option Base 1

Private Sub Form_Click()

Dim i As Integer, j As Integer

Dim A(1 To 100) As Integer

Dim B(1 To 10, 1 To 10) As Integer

For i = 1 To 100

A(i) = Int(Rnd * 100)

Next i

For i = 1 To 【 9 】

For j = 1 To 【 10 】

B(i, j) = 【 11 】

Print B(i, j);

Next j

Print

Next i

End Sub

编写一个程序把一维数组的各元素反序存放。在主过程中调用subl过程把从键盘上输入的10个元素反序存放后再输出。根据题意，请完善下列程序。 Private Sub subl(b()As Integer, ByVal n As Integer) Dim i As Integer, j As Integer, t As Integer 【 】 j=n Do While i＜j t=b(i):b(i)=b(j):b(j)=t i=i+1:j=j-1 Loop End Sub Private Sub Command1_Click() Dim a(1 To 10)As Integer, i As Integer Randomize For i=1 To 10 a(i)=Int(100*Rnd)+1 Next i For i=【 】 Print a(i); Next i Print Call【 】 For i=i To 10 Print a(i); Next i Print n End Sub

以下fun函数的功能是：找出具有N个元素的一维数组中的最小值，并作为函数值返回，请填空。(设N己定义)

int fun(int x[N])

{int i，k=0

for(i=0；i<N；i++)

if(x[i]<x[k])k=_____；

return x[k]；

}

以下程序的功能是：将一维数组A中的100个元素分别赋给二维数组B的每个元素并打印出来，要求把A(i)到A(10)依次赋给B(1，1)到B(1，10)，把A(11)到A(20)依次赋给

B(2，1)到B(2，10)，……，把A(91)到A(100)依次赋给B(10，1)到B(10，10)。请填空。

Option Base 1

Private Sub Form_Click()

Dim i As Integer，j As Integer

Dim A(1 To 100)As Integer

Dim B(1 To 10,1 To 10)As Integer

For i=1 To 100

A(i)=Int(Rnd*100)

Next i

For i=1 To【 】

For j＝1 To【 】

B(i,j)＝【 】

Print B(i,j)；

Next j

Print

Next i

End Sub

下列程序的功能是：把一维数组a的元素，每5个元素赋值给二维数组b的每一行。 Private SubCommand1_Click() Dim a(25)As Integer，b(5，5)As Integer For i=1 To【 】 a(i)=Int(Rnd*25) Print a(i)； Next i Print For i=1 To 5 For i=1 To 5 b(i，j)=【 】 Print b(i，j)； Next j Print Next i End Sub