1樓:匿名使用者
稍等,給你做乙個
text1.text = ""
text2.text = ""
dim aa(1 to 5, 1 to 5) as integer, bb(1 to 5) as integer
for i = 1 to 5 '生成5*5的矩陣,並在text1中顯示
for j = 1 to 5
randomize
aa(i, j) = int(rnd * 90 + 10)
if j < 5 then
text1.text = text1.text & aa(i, j) & ", "
else
text1.text = text1.text & aa(i, j)
end if
next j
text1.text = text1.text & vbcrlf
next i
for i = 1 to 5 '將第二行與第四行調換
for j = 1 to 5
if i = 2 then
bb(j) = aa(i, j)
elseif i = 4 then
aa(2, j) = aa(4, j)
aa(4, j) = bb(j)
end if
next j
next i
for i = 1 to 5 '在text2中顯示調換後的矩陣
for j = 1 to 5
if j < 5 then
text2.text = text2.text & aa(i, j) & ", "
else
text2.text = text2.text & aa(i, j)
end if
next j
text2.text = text2.text & vbcrlf
next i
2樓:匿名使用者
dim a(1 to 5,1 to 5) as integer, i as integer, tmp as integer
for i=1 to 5
for tmp=1 to 5
a(i,tmp)=int(rnd*100)next
next
for i=1 to 5
tmp=a(2,i)
a(2,i)=a(4,i)
a(4,i)=tmp
next
在乙個5x5的矩陣中,將第2行與第4行的資料對換
3樓:時空聖使
【知識點】自
若矩陣a的特徵值為λ1,λ2,...,λn,那麼|a|=λ1·λ2·...·λn
【解答】
|a|=1×2×...×n= n!
設a的特徵值為λ,對於的特徵向量為α。
則 aα = λα
那麼 (a²-a)α = a²α - aα = λ²α - λα = (λ²-λ)α
所以a²-a的特徵值為 λ²-λ,對應的特徵向量為αa²-a的特徵值為 0 ,2,6,...,n²-n【評注】
對於a的多項式,其特徵值為對應的特徵多項式。
線性代數包括行列式、矩陣、線性方程組、向量空間與線性變換、特徵值和特徵向量、矩陣的對角化,二次型及應用問題等內容。
basic語言就是vb嗎,VB語言是什麼?
不是的!vb 是視覺化的,視窗程式設計的一個軟體!基於basic語言的!basic 是程式語言!注意區別 程式設計軟體和程式語言!就像c 和vc 的道理一樣! basic語言不等於vb,vb6使用的語言基礎是basic語言,但它與傳統的basic語言有較多差異。basic beginners all...
使用vs2019用vb語言編寫簡單的網頁具體代
一念春風十里不如你 就是最簡單的html 了!這有什麼難度 用vs2012編寫vb程式。等急求! 嗯很願意幫助你怎麼發給你呢 vs2012中vb語言的form1.move 20,20 form1.left 20 form1.top 20 我猜是這樣!誰能幫我用html語言做一個簡單的網頁?就行 非常...
用vb語言實現,把excel工作簿裡所有工作表的內容移到另工作簿裡,怎麼實現
百無生 1 把以下這段 複製到個人巨集工作簿的模組裡準備呼叫sub movesheets dim w as workbook,ws as workbook,sht as worksheet,i as integer set w workbooks 源檔名 set ws workbooks 目標檔名 ...