编写函数Fun,函数的功能是:判断一个数是否为素数。

编写函数Fun,函数的功能是:判断一个数是否为素数。
要求:使用For语句来实现,并用函数名Fun作为该数是否为素数的标志,如果该数是素数,函数返回True,否则函数返回False!
Private Function Fun(m As Long) As Boolean
'********** Begin **********

'********** End **********
End Function

Private Sub Form_Load()
Show
Print "23是素数吗?"; Fun(23)
Print "225是素数吗?"; Fun(225)
NJIT_VB
End Sub

Private Sub NJIT_VB()
Dim i As Integer
Dim a(10) As String
Dim fIn As Integer
Dim fOut As Integer
fIn = FreeFile
Open App.Path & "\in.dat" For Input As #fIn
fOut = FreeFile
Open App.Path & "\out.dat" For Output As #fOut
For i = 1 To 10 Step 1
Line Input #fIn, a(i)
Print #fOut, Fun(Val(a(i)))
Next
Close #fIn
Close #fOut
End Sub

int fun()

{int i,j,t=1,sum=0;

for(i=100;i<=200;i++){

for(j=2;j<i;j++)if(i%j==0)t=0;

if(t){printf("%d\t",i);sum+=1;}

t=1;

}

return sum;

}

main(){

int num;

num=fun();

printf("sum=%d",num);

getch();

}

扩展资料

编写函数fun(),函数的功能是:根据以下公式计算s,计算结果作为函数值返回;n通过形参传入。

S=1+1/(1+2)+1/(1+2+3)+…+1/(1+2+3+…+n)

例如:若n的值为11时,函数的值为1.833333。

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

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

试题程序:

#include <conio.h>

#include <stdio.h>

#include <string.h>

float fun(int n)

main()

int n;

float s;

clrscr();

printf("\nPlease enter N: ");

scanf("%d",&n);

s=fun(n);

printf("The result is:%f\n " , s);

答案

float fun(int n)

{

int i,sA=0;

float s=0.0;

for(i=A;i {sA=sA+i; /*求每一项的分母*/

s=s+A.0/sA; /*求多项式的值*/

}

return s;

}

温馨提示:内容为网友见解,仅供参考
第1个回答  2015-06-30
#include <stdio.h>
#include <stdlib.h>

int isPrime(int n)
{
    if(n<=1) return 0;
    if(n%2==0) return n==2;
    int i;
    for(i=3;i*i<=n;i+=2)
    {
        if(n%i==0) return 0;      
    }
    return 1;
}

int main()
{
    int i;
    int sum=0;
    printf("2-100之间的素数有:\n");
    for(i=2;i<=100;i++)
    {
        if(isPrime(i))
        {
           printf("%d ",i);
           sum += i;
        }
    }
    printf("\n它们的和是:%d\n",sum);
    system("pause");
    return 0;
}

本回答被网友采纳
第2个回答  2017-09-05
Private Function Fun(m As Long) As Boolean
Fun = False
For i = 2 To Sqr(m)
If m Mod i = 0 Then Exit Function
Next
Fun = True
End Function

编写函数Fun,函数的功能是:判断一个数是否为素数。
int fun(){int i,j,t=1,sum=0;for(i=100;i<=200;i++){ for(j=2;j

编一个函数fun,功能是判断一个整数m是否为素数,若是返回1,否则返回0...
include <stdio.h> include <math.h> void main(){ int n;\/\/ 接收输入的正整数 int i;int j;\/\/j=0标志n是质数,j=1标志n是合数 printf("请输入一个正整数!\\n");scanf("%d",&n);while(n<0){ printf("请输入一个正整数!\\n");scanf("%d",&n);} if (n>=0){ if (n==...

设计一个函数fun(),它的功能是判断x是否是素数。如果x是素数,返回1;如...
int fun(int x) \/\/判断x是否为素数 { int i;for(i=2;i<x;i++)if(x%i==0) break;if(i==x) return 1;else return 0;}

编写一个函数判断一个数是否是素数,并在主函数中调用该函数求出所有三...
编写一个函数判断一个数是否是素数,并在主函数中调用该函数求出所有三位数的素数 #include<stdio.h>intfun(intk){intn,t,i;n=k;for(i=2;i<999;i++){if(n%i==0){t=1;break;}}if(t==1)printf("%d素数\\n",n);elseprintf("%d非素数\\n",n);return0;}intmain(){inti=1,n;f... #inc...

编写一个函数判断一个数是否是素数,并在主函数中调用该函数求出所有三...
include<stdio.h> int fun(int k){ int n,t,i;n=k;for(i=2;i*i<=k;i++)\/\/这里出现错误,应该是i<=k,而不是k<=999 if(n%i==0)return 0;return 1;} int main(){ int i,n;for(i=100;i<=999;i++){ if(fun(i))printf("%d ",i);\/\/这里输出i而不是fun } return...

从键盘输入一个整数,调用函数fun判断其是否素数?
判断素数一般是判断数据能够否被2及以上的数据整除,方法1是直接除以大于2的数据,判断是否可以被整除。另外一种方法是开平方后,判断是否可以被2及以上的数据整除。下面列出方法1的示例:include "stdio.h"int fun(int arg){ int ret = 0;if (arg ==2){ return 1;} for(int i=2;i<arg;i...

编写一个函数,判断一个数是不是素数。在主函数中输入一个整数,输出是否...
include<cmath> using namespace std;void fun(int a){ int k,i;k=sqrt(a);for(i=2;i<=k;i++)if(a%i==0)break;if(i>k)cout<<a<<"是素数"<<endl;else cout<<a<<"不是素数"<<endl;} main(){ int a;cout<<"请输入一个整数";cin>>a;fun(a);return 0;} ...

C语言如何使用自定义函数判断素数?
h> int fun(int x)\/\/ { if(x<2)return 0;\/\/返回0,非素数 for(int i=2;i*i<=x;i++)if(x%i==0)return 0;return 1;\/\/返回1,素数 } int main(){ int n;scanf("%d",&n);if(fun(n)==1)printf("%d是素数\\n",n);else printf("%d不是素数\\n",n);return 0;} ...

判断一个数是否为素数 用C语言编程,要求用到函数
bool fun(int n)\/\/定义一个函数,返回类型bool { int i;for (i=2;i<n;i++)\/\/素数判断 if (n%i==0)return false;\/\/能被数字本身以及1以外的数字整除,返回false return true;\/\/如果for循环的素数判断通过,返回true } main(){ int n;scanf("%d",&n);if (fun(n))\/\/调用函数fun ...

C语言..以下fun函数用以判断n是否是素数,fun函数中有逻辑错,请调试改正...
int fun(int n) \/\/注意,应该有返回值类型 { int k,yes=1;for(k=2; k<=n\/2; k++)if(n%k==0) {yes=0; break;} \/\/注意,应该及时break return yes;}

相似回答