⑴编写函数fun,功能是:计算s(N)数组中N个数的平均数,平均值通过行参返回主函数,将小于平均值

作者&投稿:鲁冠 (若有异议请与网页底部的电邮联系)
用Fortran语言编写 ⑴编写函数fun,功能是:计算s(N)数组中N个数的平均数~

#includevoid fun(int p[][3],int q[]){ int i,j,m; for(j=0;j<3;j++) for(i=0;i<3;i++) { m=j*3+i; q[m]=p[i][j]; }}void main(){ int p[3][3]={{33,33,33},{44,44,44},{55,55,55}}; int q[10]={0,0,0,0,0,0,0,0,0}; int i; fun(p,q); for(i=0;i<10;i++) printf("%d,",q[i]);}

我把改过后的代码贴上来吧
//#include"stdafx.h"
#include
using namespace std;
double fun(double score[],double N,double &ave){
double s=0;
int i;
for(int i=0;i<N;++i)
s+=score[i];
ave=s/N;
double r = 0.0f;
for (i = 0; i <N; i++){
if (score[i] >= ave)
continue;
else {
r = max(score[i], r);
}
//if (r>= ave||r<= score[i])
//r=ave;
}
return r;
}
const int N=10;
int main(){
double ave, r;
double score[N];
//r=fun(score,N,ave);
cout<<"请输入数据"<<endl;
for(int i=0;i<N;++i)
cin>>score[i];
r = fun(score,N,ave);
cout << ave << endl;
cout << r << endl;
return 0;
}
以上代码在gcc 4.9.2中编译通过
有不懂的可以再问

/*
⑴编写函数fun,功能是:计算s(N)数组中N个数的平均数,
平均值通过行参返回主函数,
将小于平均值且最接近平均值的数作为函数值返回,
在主程序中产生随机数,调用fun后输出平均值和小于平均值且最接近平均值的数。
(随机数函数:Call Random_Number(x),产生[0,1)的随机数存入x)
⑵如果一个数的因子之和等于这个数本身,则称这样的数为“完全数”。
例如整数28的因子为1,2,4,7,14,其和为1+2+4+7+14=28,因此28是一个完全数。
编写一个程序,从键盘上输入整数M、N,求出M和N之间所有的完全数。
*/
#include <stdio.h>
#include <stdlib.h>

typedef double LL;

int N = -1;//个数
int M = -1;
LL S[100000] = {0};

LL fun(LL S[],LL &average);
void perfectNumber(int M,int N);
int compare(const void* elem1, const void* elem2)
{
return *(double *)elem1 > *(double *)elem2 ? 1 : -1;
}
void Random_Number(double &x)
{
x = rand()/32767.0;
//printf("x=%lf,",x);//打印随机数
}
int main()
{
LL average;
LL beforeavg;
int cases = 0;
printf("==start==\n\n");
printf("Input 函数fun test cases:");
scanf("%d",&cases);
while(cases-- > 0){
printf("Input N:");
scanf("%d",&N);
int i = 0;
for(i=0;i<N;++i){
Random_Number(S[i]);
}
beforeavg = fun(S,average);
if(beforeavg < 0){
printf("There is no number less then average.");
}else{
printf("beforeavg : %lf\n",beforeavg);
}
printf("average : %lf\n\n",average);
}

printf("Input 完全数 test cases:");
scanf("%d",&cases);
while(cases-- > 0){
printf("Input 整数M、N:");
scanf("%d%d",&M,&N);
perfectNumber(M,N);
}
printf("==end==\n");

return 0;
}
LL fun(LL S[],LL &average)
{
LL all = 0;
for(int i=0;i<N;++i){
all += S[i];
}
average = all/N;
//for(int k =0;k<N;)printf("x=%lf,",S[k++]);//排序前打印随机数
qsort(S,N,sizeof(LL),compare) ;
//printf("\n");
//for(int k1 =0;k1<N;)printf("x=%lf,",S[k1++]);//排序后打印随机数
for(int k=N-1;k>=0;k--){
if(S[k]<average){
return S[k];
}
}
return -1;
}
void perfectNumber(int M,int N)
{
int num,all;
if(M>N){
num = M;
M = N;
N = num;
}
for(num = M;num <= N;++num){
all = 1;
for(int i =2;i<num && i<=num/2; i++){
if(num%i == 0)all += i;
}
if(all == num){
printf("perfectNumber:%d\n",num);
}
}
return;
}

//1题
#include <iostream>
using namespace std;

void Random_Number(double &x);

double fun(double p[], int n, double &avg)
{
    if (n <= 0)
        return 0;

    int i;
    double num = 0;
    for (i = 0; i < n; i++)
        num += p[i];

    avg = num / n;

    double r = avg;
    for (i = 0; i < n; i++)
    {
        if (p[i] >= avg)
            continue;

        if (r >= avg || r <= p[i])
            r = avg;
    }

    return r;
}

int const N = 100;
int main()
{
    double arr[N];
    for (int i = 0; i < N; i++)
        Random_Number(a[i]);

    double avg, r;
    r = fun(arr, N, avg);

    cout<<avg<<endl;
    cout<<r<<endl;
    return 0;
}

//2题
#include <iostream>
using namespace std;

int sum_yinzi(int n)
{
    int sum = 0;
    int a = n;
    int i = 1;
    do
    {
        if (n % i == 0)
        {
            a = n / i;
            sum += (i + ((i < a && a < n) ? a : 0));
        }
        i++;
    } while (i < a);
    return sum;
}

bool is_wanquanshu(int n)
{
    if (n < 1)
        return false;
    return sum_yinzi(n) == n;
}

int main()
{
    int M, N;
    cout<<"请输入M、N:"<<endl;
    cin>>M;
    cin>>N;
    cout<<M<<"和"<<N<<"之间的完全数有:"<<endl;
    for (int i = M; i <= N; i++)
    {
        if (is_wanquanshu(i))
            cout<<i<<" ";
    }
    return 0;
}


请编写函数fun,其功能是:计算并输出 S=1+(1+2^0.5)+(1+2^0.5+3^0.5...
答:double fun(int n){ int i;double x=1.0,sum=x;if(n==0)return 0.0;for(i=2;i<=n;i++){ x+=sqrt(i);sum+=x;} return sum;} main(){ int n;scanf("%d",&n);printf("%lf",fun(n));getch();} fun()函数就是:double fun(int n){ int i;double x=1.0,sum=x...

⑴编写函数fun,功能是:计算s(N)数组中N个数的平均数,平均值通过行参返回...
答:⑴编写函数fun,功能是:计算s(N)数组中N个数的平均数,平均值通过行参返回主函数,将小于平均值且最接近平均值的数作为函数值返回,在主程序中产生随机数,调用fun后输出平均值和小于平均值且最接近平均值的数。(随机数函数:Call Random_Number(x),产生[0,1)的随机数存入x)⑵如果一个数的因...

编写函数fun其功能是:根据整型形参m,计算如下公式的值:y=1+1/3+1...
答:float fun(int t);int main(){ int t=9;scanf("%f\n",&t);printf("%f\n",fun(t));return 0;} float fun(int t) { float a=0;int k=1;for(int n=0;n<=t;n++) { a=a+1./(2*n+1);} return a;}

编写函数fun,其功能是:统计s所指字符串中的数字字符个数,并作为函数值...
答:int fun(char *s){int i,k=0;for(i=0;s[i]!='\0';i++){if(s[i]>='0'&&s[i]<='9')k++;} return k;函数说明:用一个循环嵌套就搞定了,外循环的终止条件为待查找的字符串结束为止,内循环只需要做将查找的字符串的字符与当前待查找字符串的当前字符进行逐一比较,当有字符不想...

请编写函数fun,其功能是:统计s所指字符串中的数字字符个数,并作为函...
答:int fun(char *s){int n=0;for(;*s;s++)if(*s>='0'&&*s<='9')n++;return n;}

请编写函数fun,其功能是:统计s所指字符串中的数字字符个数,并作为函...
答:int fun(char *s){int i,k=0;for(i=0;s[i]!='\0';i++){if(s[i]>='0'&&s[i]<='9')k++;} return k;例如:include <stdio.h> define MAX_LEN 25 /* 字符串字符个数 */ int Count(char s[]); /* 计算函数声明 */ main(){ int i;int count = 0;char ch;char ...

用Fortran语言编写 ⑴编写函数fun,功能是:计算s(N)数组中N个数的平均...
答:includevoid fun(int p[][3],int q[]){ int i,j,m; for(j=0;j<3;j++) for(i=0;i<3;i++) { m=j*3+i; q[m]=p[i][j]; }}void main(){ int p[3][3]={{33,33,33},{44,44,44},{55,55,55}}; int q[10]={0,0,0,0,0,0,...

请编写一个函数fun,它的功能是:计算n门课程的平均分,计算结果作为函数值...
答:float fun(float a[],int n){ int i;float s=0,t;for(i=0;i<n;n++)int fun(int *p,int n){int t;for(t=0,n--;n>=0;n--)if(p[n]>t)t=p[n];return t;

请用c语言编写一个函数fun功能是:计算n门课程的平均分,计算结果作为函 ...
答:float fun(float a[],int n){ int i;float s=0,t;for(i=0;i<n;n++)s=s+a[i];t=s/n;return(t);}

vb程序设计 题目:编写函数fun,其功能是:能计算从1开始到n的自然数的...
答:Private Sub Command1_Click() Dim n As Integer n = InputBox("请输入一个正整数", "计算从1到n的平方和", 10) Print "fun(" & n & ")=" + CStr(fun(n))End SubPrivate Function fun(n As Integer) As Double For i = 1 To n s = s + i ^ 2 Next i fun ...