FORTRAN程式改寫為VB程式

時間 2021-09-14 17:52:23

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...

將范仲淹蘇幕遮改寫為散文

首詞抒寫思鄉之情 羈旅之思,以鐵石心腸人作黯然銷魂語,尤見深摯。碧雲天,黃葉地 二句,一高一低,一俯一仰,展現了際天極地的蒼莽秋景,後為元代王實甫 西廂記 長亭送別 一折所化用。秋色連波 二句,落筆於高天厚地之間濃郁的秋色和綿邈的秋波 秋色與秋波相連於天邊,而依偎著秋波的則是空翠而略帶寒意的秋煙。在...