Nouveau dans la prog

module module1
    sub main ()
        dim Mavariable As double
        Mavariable = 3,5
        if Mavariable = 3,5 then
              console.writeline ("salut")
              console.read()
        else
              console.writeline (hello")
              console.read()
        end if
    end sub
end module

module module1
    sub main ()
        dim Mavariable as string
        Mavariable = ("mario")
        for Mavariable2 as integer = 0 to 20
        console.write (Mavariable)
        console.readline()
        next
    end sub
end module

module module1
    sub main ()
        Dim Mavariable as string
        Mavariable = ("as tu quatorze ans")
        console.writeline (Mavariable)
        console.read()
        select case choix
                    case 1
                        console.writeline("vous avez quatorze ans")
                        console.read()
                    case 2
                        console.writeline("vous n'avez pas quatorze ans")
                        console.read()
        if select case choix = case 1 then
              console.writeline ("on a le même âge")
              console.read()
        else
              console.writeline ("on as pas le même âge")
              console.read()
        end if
    end sub
end module