今天给大家出题了:输入一个100以上的数,求其范围以内的质数。

来源:百度知道 编辑:UC知道 时间:2024/07/04 13:30:27
用Pascal语言做,请注意!如果不是,很抱歉!

program qs;
var i,j,n:integer;
bz:boolean;
begin
write('输入一个大于100的整数:');
readln(n);
for i:=2 to n do
begin
bz:=true;
for j:=2 to i-1 do
if i mod j=0 then bz:=false;
if bz then write(i,' ');
end;
end.

#include<stdio.h>
#include<math.h>
int main()
{ int i,j,p,n;
scanf("%d",&n);
for(i=0;i<n;i++)
{
for(p=0,j=2;j<=sqrt(i);j++)
{
if(i%j==0){p=0;break;}
else p=1;
}
if(p==1)printf("%d ",i);
}
return 0;
}

C++编程:
#include<iostream.h>
void f(long n)
{int i,j;
for(i=2;i<=n;i++)
{
for( j=2;j<i;j++)
if(i%j==0)
break;
if(j==i)
cout<<i<<" ";
}
cout<<endl;
}
void main()
{
long n;