1樓:匿名使用者
看你那麼慘,就給你翻一個吧
dim psi(9, 9) as double'下面有個地方用陣列時超過了5,所以我索性改為9了
esp = 0.00001
for j = 1 to 5
for i = 1 to 8
psi(i, j) = 0
next i
next j
for j = 2 to 4
psi(1, j) = (j - 1) * 0.5
next j
for i = 2 to 8
psi(i, 5) = 2
next i
w = 1.35
k = 0
sdij0 = 0
40k = k + 1
sdij1 = 0
psi(2, 6) = psi(5, 2) * 0.125 / 0.625
psi(7, 3) = psi(7, 4) * 0.125 / 0.625
psi(8, 4) = (2 * psi(7, 4) + 2) / 4
for j = 2 to 4
for i = 2 to j + 3
'不過在vb6裡下面這句會超過vb6運算數值的上限導致溢位。建議你用vb.net計算
dij = w * (psi(i + 1, j) + psi(i - 1, j) + psi(i, j + 1) + psi(i, j - 1)) / 4 - psi(i, j)
sdij1 = sdij1 + abs(dij)
psi(i, j) = psi(i, j) + dij
next i
next j
if (abs(sdij1 - sdij0) > eps) then
sdij0 = sdij1
goto 40
else
end if
debug.print "sdij0", sdij0
debug.print "sdij1", sdij1
debug.print ("done")end
2樓:
'將問題補充這段改寫成vb
for j=2 to 4
for i=2 to j+3
dij=w*(psi(i+1,j)+psi(i-1,j)+psi(i,j+1)+psi(i,j-1))/4.0-psi(i,j)
sdij1=sdij1+abs(dij)
psi(i,j)=psi(i,j)+dijnext i,j
if abs(sdij1-sdij0)>eps thensdij0=sdij1
go to 40
end if
3樓:匿名使用者
你不如直接從網上找一個 vb 的 laplace 演算法。
我估計沒幾個人願意花許多功夫給你翻譯(包括我)
如何高效地把fortran77的程式改寫成fortran90
4樓:匿名使用者
f90和f77沒有本質的區別,實際上他倆80%的內容是一致的。f90是對f77的補充,及很少很少部分的丟棄。所以,f90其實是大多數包含f77的。
只要你的編譯器支援f90,(據我所知,沒有任何編譯器不支援f77),那麼兩者完全是可以混著寫的。實際中,幾乎沒有程式設計師可以100%明確自己在用f90還是f77就像幾乎沒有北京人可以分清楚自己說的話,哪些是北京話,哪些是普通話一樣。
fortran語言轉換為c語言的程式
5樓:菲菲大愛
2c 和 p2c 是兩個源**轉換程式. f2c 把 fortran **轉換為 c **, p2c 把 pascal **轉換為 c **. 當你安裝 gcc 時這兩個程式都會被安裝上去.
如果有一些用 fortran 或 pascal 寫的**要用 c 重寫的話, f2c 和 p2c對你非常有用. 這兩個程式產生的 c **一般不用修改就直接能被 gcc 編譯.
如果要轉換的 fortran 或 pascal 程式比較小的話可以直接使用 f2c 或 p2c不用加任何選項. 如果要轉換的程式比較龐大, 包含很多檔案的話可能要用到一些命令列選項.
在一個 fortran 程式上使用 f2c , 輸入下面的命令:
f2c my_fortranprog.f
注意: f2c 要求被轉換的程式的副檔名為 .f 或 a .f .
要把一個pascal 程式裝換為 c 程式, 輸入下面的命令:
p2c my_pascalprogram.pas
這兩個程式產生的 c 源**的檔名都和原來的檔名相同, 但副檔名由 .f或 .pas 變為 .c.
vb6.0呼叫fortran** 100
6樓:
做成動態連結dll,然後再用vb呼叫,只要在fortran源程式之前加上一段**就可以,fortran編譯器用vf或者compaq或者intel f都可以。程式設計還是很不錯的,具體可以再看看混合程式設計方面的東西。
用vc++或者vb做已知輸入輸出的fortran程式的視覺化介面,看什麼書好?學多久能做出介面來?
7樓:匿名使用者
vb 吧 這個做個介面有這麼麻煩麼
vc用mfc也很做的,至於你說的做了介面怎麼連線你的fortran我就不知道了
不過你可以在網上查檢視
很簡單的,你不用看孫鑫的教程了,浪費時間,那個還講些什麼原理啊之類的你建立一個mfc工程,再用資源來直接畫介面就行當然vb更簡單,我們初中時就是學的vb 做介面很方便
8樓:
vb做介面最快,但是你只會c語言,那還不如用vc做,畢竟新學一門語言,沒有幾個月做不出來東西的
9樓:風箏
現在的fortran語言已經具備視覺化功能了,但是視覺化的方便程度依然不及c++,vb等,如果源程式是fortran程式,建議直接用fortran 做,雖然不及c++,vb那樣直接拖拽mean或者button來得方便快捷,但對於用fortran而言,無非是多加幾行**而已。重新學一門語言難度太大。
試用高斯消元法編制fortran程式計算n元一次方程組
以下是約當消去法解方程組,供參考。c 約當削去法解線性方程 c program jordan real a 5,6 data a 1,0,6,0,0,1 0,1,0,0,0,1 0,0,1,0,0,1 0,0,0,1,0,1 0,0,0,0,1,1 1,1,7,1,1 write 100 a i,j...
同時學習兩語言c和fortran曾學過vb和c現在要讀
開始拿本c語音的教材即可,不要一上了就啃 硬體知識 微機原理 等偏硬體的東西,那東西肯定會學的無味 多看 和寫 一定不要複製 直接用,新手最好動手寫,哪怕是抄也行,會增加編寫 的能力,否則看當時看懂過後就忘了 沒有具體的時間,理解c語言的基本就好了,如變數 結構體 函式 指標等,以後就可以看些win...
將范仲淹蘇幕遮改寫為散文
首詞抒寫思鄉之情 羈旅之思,以鐵石心腸人作黯然銷魂語,尤見深摯。碧雲天,黃葉地 二句,一高一低,一俯一仰,展現了際天極地的蒼莽秋景,後為元代王實甫 西廂記 長亭送別 一折所化用。秋色連波 二句,落筆於高天厚地之間濃郁的秋色和綿邈的秋波 秋色與秋波相連於天邊,而依偎著秋波的則是空翠而略帶寒意的秋煙。在...