Advertisement
Jadoskills

V3B, Small basic

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