Conversion code source VB vers Python3?

Question

Quelqu'un peut-il m'aider à convertir le code source ci-après vers Python 3.

Le programme ouvre un fichier"essai.txt"  et   lit ce fichier ligne par ligne dont il inverse la chaîne de caractères puis la réécrit dans le fichier "essai2.txt".

Merci à l'avance.

Voici le code source en Visual Basic  :


    Dim Chaine As String, Fligne As String

    Open "c:&#92;essai.txt" For Input As #1
    Open "c:&#92;essai2.txt" For Output As #2

    Do While Not EOF(1)
        Line Input #1, Chaine
        Chaine = InverseChaine(Chaine)
        Print #2, Chaine
        Chaine = ""
    Loop

    Close #1

    Close #2

-----------------------------------------

    Public Function InverseChaine(a As String)
    Dim ligne As String
    Dim l As Long
    ligne = ""
    l       = Len(a)
    Chaine = a

        Do While l > 0

           ligne = ligne + Mid(Chaine, l, 1)
           l = l - 1

        Loop
  
    InverseChaine = ligne

    End Function

? · Accepted Answer

Entre nous, vu l'immense complexité du fonctionnel, tu as meilleur compte à l'écrire de zéro ton prg en Python

Spanish Inquisition · Answer

En Python, c'est quand mÃªme plus joli d'Ã©crire une fonction InverseChaine rÃ©cursive.
Une chaÃ®ne inversÃ©e, c'est le dernier caractÃ¨re de la chaÃ®ne auquel on concatÃ¨ne l'inversion de ce qui reste de la chaÃ®ne...

Shark-Ozzy · Answer

def InverseChaine (ch):
----- if ch=='' :
----------------return ''
------else :
----------------return ch[-1] + InverseChaine(ch[:-1])

Comme l'a dit Spanish...

et le reste devrait ressembler Ã  :

f = open('essai.txt','r')
g= open('essai2.txt','w')
for line in f:
------------ g.write(InverseChaine(line))
f.close()
g.close()

Conversion code source VB vers Python3?

3 réponses