var a, b, c : real %Variables
var term : int
put "Please enter how many terms you want in this sequence: " .. %Prompts user for how many terms wanted.
get term

var Fib : array 1 .. term of real %Starts an array
a := 1 %Declares a as 1
b := 0 %Declares b as 0
for i : 1 .. term %Makes the program so that it will display as many terms as the user wants
c:= a + b %The equation so that the first 2 numbers will add up to the next number
put c , " " .. %Outputs the number
a:= b %A is declared as B. A is now the next number.
b:= c %B is declared as C. B is now the next number. The sequence is able to progress.
end for