Advertisement
Jadoskills

V3B, Small Basic op. Mr Elis troll

May 22nd, 2012
1,037
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. Begin:
  2. TextWindow.Write("Voer de waarde in: ")
  3. n = TextWindow.Read()
  4. X = 0
  5. A = 0
  6. B = 1
  7. If n = 0 Then
  8.   TextWindow.WriteLine("Het antwoord is 0.")
  9. Else
  10.   While X <= N
  11.     C = A+B
  12.     teller = teller + 1
  13.     is = " is "
  14.     TextWindow.Writeline("Het antwoord van "+teller+is+C)
  15.     B = C
  16.     A = B
  17.     X = X+1
  18.   EndWhile
  19. EndIf
  20. Goto Begin
  21.   credits = "made by Guido and Jad"
Advertisement
RAW Paste Data Copied
Advertisement