1樓：888無餘
var a,i:longint;t:boolean;
begin
t:=true;
readln(a);
if a=1 then writeln('f');
if a<>1 then begin
for i:=2 to trunc(sqrt(a)) doif a mod i=0 then t:=false;
if t then writeln('t')else writeln('f');
end;
end.
2樓：匿名使用者
vara,i:longint;
b:boolean;
begin
read(a);
if a=1 then
begin
writeln('no comment');//1既不是質數也不是合數。
exit;
end;
for i:=2 to trunc(sqrt(a))do//判斷n是不是質數，只要看看它被不被2到根號n整除
if a mod i=0 then begin b:=true; break; end;//如果被整除就b：＝true
if not b then writeln('yes')//如果a不被整除就輸出yes
else writeln('no');//否則輸出no
end.
3樓：沃萌_我的快樂
var a,b,c,x,i,n:longint; z:boolean;
begin
readln(n);
z:=true;
for i:=2 to n-1 do if (n mod i=0) then z:=false;
if z=false then writeln('bushi')else writeln('shi');
end. 純手寫 望採納
4樓：匿名使用者
var ok:boolean;
i,n:longint;
begin
readln(n);ok:=true;
for i:=2 to trunc(sqrt(n)) doif n mod i=0 then
ok:=false;
if ok then wrtie('yes')else write('no');
end.
5樓：
zhege 貌似簡單。。
.從鍵盤輸入乙個數，判斷該數是否為素數（除了1和它本身之外不能被其他數整除的數）。
6樓：倒霉熊
input'輸入數值bai
判斷是否du為素數，請輸入數字：zhi' to mm1=.t.
for aa=2 to m-1
if mod(m,aa)=0
m1=.f.
exit
endif
endfor
if m1
?'該數【
dao',m,'】是素數.'
else
?'該數【',m,'】不是素數，回他能答被【',aa,'】整除.'
endif
7樓：悲しみが積
雖然不會vf，不過看你的程式應該在檢測出可整除之後就退出迴圈的，不然你的f標誌只決定於最後一位是否整除。
還有，迴圈明顯只要到根號m就行了
輸出1-100之內的所有質數(質數是除了1和本身能被其整除外，沒有其它整數能被其整除的數)
8樓：
public class $ }}
private static boolean iszhishu(long num)
}return true;}}
9樓：匿名使用者
for(int i=1;i<=100;i++)
}if(j>k)
編輯乙個c語言程式 判斷數m是否為素數（只能被1和它本身整除的整數）? 10
10樓：匿名使用者
①bai
**du：zhi
#include
int isprime(long n);
int main(int argc, char const *argv)
int isprime(long n)
②dao
執行內：容
11樓：狼行千里吃肉
int main()else
return 0;}
除1和它本身之外，不能被其他整數整除的正整數稱為素數（注1不是素數，2是素數），若兩素數之差為2，則 10
12樓：郭敦顒
郭敦顒回答：
「2023年8月德國數學家希爾伯特在巴黎國際數學家大會上作了題為《數學問題》的
講演」．希爾伯特的數學問題共23個．第8問題為「素數問題,包括黎曼猜想、哥德**猜想和孿生素數猜想」．
[31,601]之間有多少對雙胞胎素數，共43個：
c語言程式設計過程程式的編寫非常專業，非我所長。
下面是我接觸過的這方面的情況。
2012-5-10
6，4. 求二維陣列的中各行的最大值;各列的平均值.並求主對角線和副對角線的元素之和.
檢舉 | 3 分鐘前
提問者： spydery
| 瀏覽次數：1次
郭敦顒回答：
這題沒給出二維陣列各行各列的各元素的具體數值，因此「二維陣列的中各行的最大值;各列的平均值」無法回答；但「主對角線和副對角線的元素之和」可解，其和為4。
追問其實吧 這是一道c語言程式題
答：在網路上讓人猜謎的題還真不少。
2012-5-24
2，問一道c題目，中間的&是什麼意思
檢舉 | 2012-5-23 21:18
提問者： 760693502
| 瀏覽次數：24次
#include
main()
答案是4
郭敦顒回答：
在回答——vfp程式：找出100-999之間個位數與十位數之和與10的模等於百位數，切該數是素數，急求！萬分感激。。。
檢舉 | 2012-5-21 21:15
提問者： 李大仁程又青9
| 瀏覽次數：23次
給出101、103、…、997共143個素數後，接著說
所以100-999之間個位數與十位數之和與10的模（之總和）等於百位數，且該數是素數的，它們的集合就是上面所列的全部素數共143個。 追問那程式怎麼寫啊？我想了好久都沒寫出來，萬分感激。。。
郭敦顒繼續回答：程式的編寫非常專業，非我所長（我不知道以後自己能否學會）我不懂怎樣編寫，但是我可以提供點資訊，你可了解查尋，或許從中可得到或悟出答案。
今天我就開始學習了，看學習效果如何，那麼就先交份答卷，看看及格否？
下面是答卷——
int a=7,b=4,c;
c=a&b;
這意思是說整數a=7,b=4，當a與 b均為真時，c為真，那麼c等於多少？條件中已給出算式：c=a&b即c=a+b，既然「a=7,b=4，」為真，於是有
c=a+b=7+4=11。
但是計算機內的計算是按二進位制進行計算的，所以
a=7，二進位制是111，佔3位（bit,1b=8bit, byte簡記為b就是位元組）；b=4，二進位制是100；佔3位（bit）；c =11，二進位制是1011，佔4位（bit）。
所以，答案是4，是說c =11，二進位制是1011，佔4位（bit）
getch(4);
getch——字元函式，getch（），通俗點說就是乙個數的二進位制的數佔多少位（bit）
填在（）中。
main——主要部分，main()指的是中的getch()。所以也有main(4)。
所以，也不要把這類問題看得過於神秘，要緊的是要明白它們的意義。
13樓：匿名使用者
#include
void main()
}i++;
}for (i=100;i<=900;i++)if (x[i]!=0)
if (x[i+2]!=0)
printf("\n100-900之間共有%d對雙胞胎素數\n",k);}
除了1和0還有它本身之外，不能被質數除盡的都是質數對不對
14樓：匿名使用者
0和1既不是質數、也不是合數。
首先：數的整除研究的非0自然數的範疇，所以質數和合數肯定不包括0。
再來看看自然數「1」。
質數是指含有1和它本身2個因數的自然數，而自然數「1」只有本身1這1個因數，所以自然數「1」不符合質數的要求，那麼「1」不是質數。
合數是指除了1和它本身2個因數外，還含有其它因數的數。也就是說合數至少有3個因數，顯然自然數「1」不符合合數的定義，所以1既不是質數，也不是合數
15樓：匿名使用者
不對，質數的定義是乙個大於1的自然數，除了1和它本身外，不能被其他自然數（質數）整除，換句話說就是該數除了1和它本身以外不再有其他的因數；否則稱為合數。
所以質數必須是自然數，不包括負數或者小數。而題目中沒有限定這個條件，所以不對。
為什麼說沒有一種北方食物是不能被陳醋輕鬆駕馭的？
這是醋的化學性質，所決定的，北方大多是麵食與醋會發生化學軟化反應。因為北方人比較喜歡吃醋，只要是食物加了醋和辣子就會很喜歡吃。面試和醋會發生化學反應，酸鹼中和，所以做出來的食物不酸不苦。醋的確是個奇妙的東西啊，什麼食物一放醋，就被它折服了。因為只要有北方的陳醋，什麼特別難聞的味道都會被沖淡。北方多麵...
人類地六感首次被徵實,第六感是一種什麼感覺
我的第六感就挺強的，經常聯想到的事情就會發生，比如被炒魷魚。哈哈不開玩笑了，第六感就是預感比較強的人。第六感 一直是人們爭論的話題，有些人對 第六感 的存在深信不移，而有些人卻認為是無稽之談。如果人類有第六感，那麼 第六感官 在 科學家最近有了新的發現。犁鼻器 第六感官？嗅覺感官？科學家在對動物界進...
你被領導劈頭蓋臉地罵一頓之後是一種什麼狀態
幹君75722赫返 沒有心情再去做別的事情，一直會把這件事情放在心上，然後反思自己，為什麼被罵，調整好心態，回到工作該有的狀態。 銘刻 我會非常的生氣，但是如果自己真的做錯了，然後被領導劈頭蓋臉的說了一頓，那麼他也是理所應當的，因為我損失了這個公司的利益。 找個方式發洩一下自己的情緒，好好的反思，改...