first_example~

program first_example ;
var a : integer;
var b : integer;
var temp : integer;
begin
a := 1;
b := 1;
begin
writeln(a ) ;
temp := b ;
b := a + b ;
a := temp ;
end
end.