Ask Question

Name:
Title:
Your Question:

Answer Question

Name:
Your Answer:
User Submitted Source Code!


Description:
  fibbonachi
Language: PASCAL
Code:
var  a,b,i,n:integer;
begin
readln(n);
a[1]:=1;
a[2]:=1;
for i:=3 to n do
a[i]:=a[i-1]+a[i-2];
writeln(a[i]);
end.
Comments: