vb已知xyz yzz 846,其中x y z是0到9的數字

2021-07-14 13:31:35 字數 1145 閱讀 8293

1樓:娛樂小八卦啊

**如下:

for z in range(11):

for y in range(6):#x+y=5,所以x或者y絕不可能大於5

for x in range(6):

if x*100 + y*10 + z  +  y*100 + z*10 + z*10==532:

print("x={},y={},z={}".format(x,y,z))

擴充套件資料

vb迴圈語句

do...loop語句

1、第一種用法

用 do 迴圈重複執行一語句塊,且重複次數不定。do...loop 語句有幾種演變形式,但每種都計算數值條件以決定是否繼續執行。

如同if...thencondition必須是一個數值或者值為 true(非零)或 false(零)的表示式。

在下面的 do...loop 迴圈中,只要 condition 為 true 就執行 statements。

do while condition

statements

loop

2、第二種用法

do...loop 語句的另一種演變形式是先執行語句,然後在每次執行後測試 condition。這種形式保證 statements 至少執行一次:

dostatements

loop while condition

注:其它兩種演變形式類似於前兩個,所不同的是,只要 condition 為 false 而不是 true,它們就執行迴圈。

2樓:慶年工坊

sub s()

for x = 1 to 9

for y = 1 to 9

for z = 0 to 9

if 100 * x + 110 * y + 12 * z = 846 then

debug.print x; y; z

end if

next z, y, x

end sub

c語言三位數求解,已知xyz+yzz=532,其中x,y,z分別代表什麼數字。

3樓:匿名使用者

#includevoid main(void)

VB中,怎樣在已知的字串中插入字元

很簡單嘛,先將原字串拆分成兩半,加入後再合上即可。dim t as string dim k as string t abcdfghijklmn k mid t,1,4 e mid t,5 這個 是將字母e插在從左向右第5個位置上。原字串是 abcdfghijklmn 插入後的字串是 abcdefg...

請教 已知正弦值,怎樣用vb求其對應的角

述返回數值的反正切值。語法atn number number 引數可以是任意有效的數值表示式。說明atn 函式計算直角三角形兩個邊的比值 number 並返回對應角的弧度值。此比值是該角對邊的長度與鄰邊長度之比。結果的範圍是從 pi 2 到 pi 2 弧度。將角度乘以 pi 180 即可轉換為弧度,...

在VB中,已知四點座標,怎麼按要求m,n等分座標

這個不難,給你個思路!自己先試試看能不能寫出來!不行的話再幫你寫!0 四個點的座標紀錄為 x1,y1 x2,y2 x3,y3 x4,y4 分別對應格子的1,5,40,36的點 1 四個點可以組成四個邊 分別記為a,b,c,d 也就是可以得到每個的邊長 求兩點的距離 2 m,n表示對兩條邊的等分情況,...