编程输入一个正整数,判断它是否是质数,是的话输出yes,不是输出no。

我用的是free pascal,程序最好用program var开头。

第1个回答  2013-03-13
#include "stdio.h"
#include "math.h"
int main()
{
int d;
int i,j;
bool m=true;

printf("输入一个正整数:");
scanf("%d",&d);

i=2;
while(i<=sqrt(d))
{
if(d%i==0)
{
m=false;
break;
}
i=i+1;
}
if(m)
printf("Yes");
else
printf("No");
}本回答被提问者采纳
第2个回答  2013-03-13
program IsPrime;
var n,i:longint; yesboolean;
begin
write('Iput n=');
readln(n);
yes:=n>1;
for i:=2 to trunc(sqrt(n)) do
if n mod i=0 then
begin
yes:=false;
break
end;
if yes then writeln('yes') else writeln('not ');
end.
相似回答