在VB中,判斷大於或等於3的正整數是否是素數

時間 2021-08-11 18:17:34

1樓:匿名使用者

a = inputbox("請輸入數")

if a >= 3 then

for i = 2 to int(a / 2)if a / i = a \ i then ’除和整除相比較m = 0

exit for ‘若結果相等則退出

else

m = 1

end if

next i

else

end if

if m = 0 then

print a & "不是素數"

elseif m = 1 then

print a & "是素數"

end if

思路是讓給出的數在2到該數一半為被除數的情況下,除和整除的商是否相等為條件。

2樓:唐

dim a as integer

a = inputbox("請輸入數")

if a >= 3 then

for i = 2 to a - 1

if a mod i = 0 then exit fornext

if i = a then

print a & "是素數"

else

print a & "不是素數"

end if

end if

vb程式設計,判斷一個正整數(>=3)是否為素數

3樓:遠風的夢想家

private sub form_click()n = inputbox("請輸入

一個正整數(

內>=3)")

k = int(sqr(n))

i = 2

swit = 0

do while i <= k and swit = 0if n mod i = 0 then

swit = 1

else

i = i + 1

end if

loop

if swit = 0 then

print n; "是

容"else

print n; "不是"

end if

end sub

4樓:同翠柏位紫

dimflag

asbyte

:flag=0

fori=2

toint(n/2)ifn

modi=0

then

flag=1

exit

forend

ifnext

i執行完

bai後,flag為0的話,

du說明是素數zhi;為1的話,是合dao數。可根據相內應要求編寫後續**容

如何用vb程式是判斷一個整數(>=3) 是否為素數(急求)

5樓:匿名使用者

dim n as integer

n = inputbox("請輸入一個整數(>=3) ")k = int(sqr(n))

i = 2

tag = 0

while i <= k and tag = 0if n mod i = 0 then

tag = 1

else

i = i + 1

end if

wend

if tag = 0 then

print n; "是一個素數。"

else

print n; "不是一個素數。"

end if

6樓:

1樓的回答完全正確。

c++編寫判斷一個正整數是否是素數的函式

7樓:匿名使用者

int prime(int x)

return 1;}

8樓:育知同創教育

c++編寫判斷素數的函式:

**如下:

//程式的目的是求0-n之間所有的素數,以下是思路#include

#include

void main()

if(f==1)//當i除以除1外所有自己的因數時,若都有餘數,則此數為素數。

cout<

根據算術基本定理,每一個比1大的整數,要麼本身是一個質數,要麼可以寫成一系列質數的乘積;而且如果不考慮這些質數在乘積中的順序,那麼寫出來的形式是唯一的。最小的質數是2。

9樓:陸蕭涵

int prime(int x)

你的函式執行後,如果是素數,返回 1,否則返回 0;

if(b==0) 這個語句寫反了,b=0就不是素數啦;

你的int prime(int x)函式裡也是錯的,if語句不能跳出迴圈,所以返回的 t就是就是最後一次迴圈的值

。#include

using namespace std;

int prime(int x)

}return 0;}

10樓:

#include

using namespace std;

int prime(int x)

}//getchar();getchar();

return 0;}

11樓:tnt丨小軒

int prime(int x)

}return 0;

}替換下自己看看就明白了,主要要+1 ,要不然5這個不能判斷。

如何編寫判斷一個正整數(>=3)是否為素數的程式?(用vb)

12樓:手機使用者

所謂素數,是指除了1和該數本身之外,不能被其他任何整數整除的數。例如,13是素數,因為它不能被2,3,4,…,12整除。

判斷一個數n(n≥3)是否素數的方法是很簡單的:將n作為被除數,將2到(n-1)各個整數輪流作為除數,如果都不能被整除,則n為素數。

private sub command1_click()dim n as long, flags as booleann = val(text1.text)

flags = true

for i = 2 to sqr(n)

if n mod i = 0 then

flags = false

exit for

end if

next

msgbox n & iif(flags, "", "不") & "是一個素數"

end sub

數列中n的取值怎麼判斷,有時候大於等於2,有時候大於等於3,我就是不明白在遞推過程中它是怎麼變得

我來試試吧.一般來說 都是從n 1開始的.那麼如果用到了遞推的話.要看角標怎麼取 舉個例子sn an 2 n 1 這個是題設條件.且告訴n 1注意這一項是從s1 a1 2 0開始遞推的.之前的我們不知道.如果有a0的話 不能得出 s0 a0 2 1 然後一般我們會用 sn sn 1 an 來約掉sn...

ecel單元格中如果a1的值大於或等於b1的值時在c1顯

在c1輸入或複製貼上下列公式之一 if a1 b1,yes no if a1 if c1 yes 150,0 c1 yes 150 在c1單元格中輸入 if a1 b1,yes no d1單元格中輸入 if c1 yes 150,if c1 no 0 c1輸入公式 if a1 b1,yes no d...

a十b十c3大於或等於abc開3次方的證明過程

證明 對於正數a b c,有a b c 3abc成立,等號當且僅當a b c時成立 因為 a b c 3abc a b c a b c ab bc ac 1 2 a b c 2a 2b 2c 2ab 2bc 2ac 1 2 a b c a b b c c a 可以看出,上式的結果是個非負數,所以a ...