int ::temp
int::a
int::b
int::i
a=1
b=1
i=0
do i=0,10
print*,a," " endprint
temp =a+b
a=b
b=temp
end do