Ошибка в условии! Fn=Fn-2+Fn-1 при n>2! Программа для вычисления Fn (вместо 5 можно поставить другое число): var f1,f2,fn,i:integer; begin f1:=1;f2:=1; for i:=3 to 5 do begin fn:=f1+f2; f1:=f2; f2:=fn; end; writeln('fn=',fn); end. F3=1+1=2; F4=1+2=3; F5=2+3=5
Fn=Fn-2+Fn-1 при n>2!
Программа для вычисления Fn (вместо 5 можно поставить другое число):
var f1,f2,fn,i:integer;
begin
f1:=1;f2:=1;
for i:=3 to 5 do
begin
fn:=f1+f2; f1:=f2; f2:=fn;
end;
writeln('fn=',fn);
end.
F3=1+1=2; F4=1+2=3; F5=2+3=5