Числа Фибоначчи (fn) определяются формулами: f0=f1=1, fn=fn-1+fn-2 при n=2,3,… Разработать схему алгоритма для вычисления числа Фибоначчи. Определить f10, f25, f40.
Числа Фибоначчи (fn) определяются формулами: f0=f1=1, fn=fn-1+fn-2 при n=2,3,… Разработать схему алгоритма для вычисления числа Фибоначчи. Определить f10, f25, f40.
Гость
Ответ(ы) на вопрос:
ГостьЕто прога на Pascal!(Будут вопросы пиши) program fibonachi;
var f:array [0..1000] of longint;
a,i,i2,i3:integer;
begin
writeln ('Vvedit nomer potribnogo chisla');
readln (a);
f[1]:=1;
f[0]:=1;
if a<=1 then
writeln(f[a]);
if a=2 then writeln(3);
if a>2 then begin
for i:=2 to a do
begin
i2:=i-1; i3:=i-2;
f[i]:= f[i2]+f[i3];
end;
writeln (f[i]); end;
readln
end. f10=89 f25=121393 f40 =165580141
Не нашли ответ?
Похожие вопросы