Hallo zusammen,
ich hoffe jemand kann mir helfen FORTRAN in Visual Basic zu übersetzen. Ich habe diesen FORTRAN Code, weiß aber leider nicht wie man manche Operatoren am besten in VB überetzt. Ich weiß, dass man "Do" in "For" übersetzen kann und die Summen sind selbsterklärend. Aber zum Beispiel die Übersetzung von den "If" Schleifen und was die Zahl nach dem "Do" zu bedeuten hat, ist mir noch ein Rätsel.
Danke für eure Hilfe
*Topic verschoben*
ich hoffe jemand kann mir helfen FORTRAN in Visual Basic zu übersetzen. Ich habe diesen FORTRAN Code, weiß aber leider nicht wie man manche Operatoren am besten in VB überetzt. Ich weiß, dass man "Do" in "For" übersetzen kann und die Summen sind selbsterklärend. Aber zum Beispiel die Übersetzung von den "If" Schleifen und was die Zahl nach dem "Do" zu bedeuten hat, ist mir noch ein Rätsel.
Danke für eure Hilfe
Quellcode
- DO 10 K=l,N
- F(K)=999999
- SUMH(K)=O
- 10 M(K)=A(K)+C(K)*D(K)
- F( l)=M( 1)
- JSTAR( l)= 1
- DO 20 K=2,N
- KMl=K-1
- DO 21 J=l,KMl
- JMl=J-1
- SUMH(J)=SUMH(J)+H(KMl)
- M(J)=M(J)+D(K) * (C(J)+SUMH(J))
- IF(J.EQ. 1) TEMP=M(J)
- IF(J.GT. 1) TEMP=F(JM l)+M(J)
- IF(TEMP.GE.F(K)) GO TO 21
- F(K)=TEMP
- JSTAR(K)=J
- 21 CONTINUE
- TEMP=F(KMl)+M(K)
- IF(TEMP.GE.F(K)) GO TO 20
- F(K)=TEMP
- JSTAR(K)=K
- 20 CONTINUE
*Topic verschoben*
Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „Marcus Gräfe“ ()