fork download

copy

Module ZahlC
  Sub Main()
    Dim a, b, c, i As Integer
    a = 1
    b = 1
    c = 1
 
    For i = 1 To 10
      If i = 10 Then
        c = a * b * c - a * b
      ElseIf i > 5 Then
        b = c - a
        c = c - 2
        a = a - 1
      Else
        c = a + b
        a = b
        b = c
      End If
    Next i
 
    MsgBox (c)
  End Sub
End Module

falcon: FATAL - Program terminated with error.
SyntaxError CO0001 at /home/8afHDg/prog.fal:1: Generic syntax error
SyntaxError CO0001 at /home/8afHDg/prog.fal:2: Generic syntax error
SyntaxError CO0001 at /home/8afHDg/prog.fal:3: Generic syntax error
SyntaxError CO0001 at /home/8afHDg/prog.fal:8: Generic syntax error
SyntaxError CO0001 at /home/8afHDg/prog.fal:9: Generic syntax error
SyntaxError CO0001 at /home/8afHDg/prog.fal:11: Generic syntax error
SyntaxError CO0166 at /home/8afHDg/prog.fal:15: Statement has no effect (at least in part)
SyntaxError CO0001 at /home/8afHDg/prog.fal:19: Generic syntax error
SyntaxError CO0001 at /home/8afHDg/prog.fal:20: Generic syntax error
SyntaxError CO0001 at /home/8afHDg/prog.fal:23: Generic syntax error
SyntaxError CO0001 at /home/8afHDg/prog.fal:23: Generic syntax error

Standard output is empty