Ирина Эланс
Function F(n: integer): integer; begin if n>2 then F:=F(n-1)+G(n-2) else F:=1; end; function G(n: integer): integer; begin if(n>2) then G:=G(n-1)+F(n-2) else G:=1; end;
Function F(n: integer): integer; begin if n>2 then F:=F(n-1)+G(n-2) else F:=1; end; function G(n: integer): integer; begin if(n>2) then G:=G(n-1)+F(n-2) else G:=1; end;
Последовательно найдем значения функций от n=1 до искомого n=7 F(1) = 1 F(2) = 1 G(1) = 1 G(2) = 1 F(3) = F(2) + G(1) = 1+1 = 2 F(4) = F(3) + G(2) = 2+1 = 3 G(3) = G(2) + F(1) = 1+1 = 2 G(4) = G(3) + F(2) = 2+1 = 3 F(5) = F(4) + G(3) = 3+2 = 5 F(6) = F(5) + G(4) = 5+3 = 8 G(5) = G(4) + F(3) = 3+2 = 5 G(6) = G(5) + F(4) = 5+3 = 8 F(7) = F(6) + G(5) = 8+5 = 13 Ответ: 13
- Function F(n: integer): integer; begin if n>2 then F:=F(n-1)+G(n-2) else F:=2; end; function G(n: integer): integer; begin if n>2 then G:=G(n-1)+F(n-2) else G:=3; end;
- Function F(n: integer): integer; begin if n>2 then F:=F(n-1)+G(n-2) else F:=n+2; end; function G(n: integer): integer; begin if n>2 then G:=G(n-1)+F(n-2) else G:=3-n; end;
- Function F(n: integer): integer; begin if n>2 then F:=F(n-1)+G(n-2) else F:=n; end; function G(n: integer): integer; begin if n>2 then G:=G(n-1)+F(n-2) else G:=2-n; end;
- Function F(n: integer): integer; begin if n>2 then F:=F(n-1)+G(n-2) else F:=n; end; function G(n: integer): integer; begin if n>2 then G:=G(n-1)+F(n-2) else G:=n+1; end;
- Function gz(a: integer):integer; var p:integer; begin if a<1 then begin gz:=1; exit; end; if a mod
- Fx1,x2,x3,x4=x1+34x2+14x3+14x4→min 6x1+x2-x3-4x4≤-4x1+5x2+x3-3x4≥1x1≥0,x2≥0,x3≥0,x4≥0 Ее решение известно: Fmin=F0,0,167,37=38 Составьте для этой задачи двойственную задачу и найдите ее решение,
- Fx=x1-32+x2-22→extr, x1+x2=a, где a-произвольное число А) решить с помощью правила множите лей Лагранжа Б) результат проверить
- Excel Разработать простейшую экспертную систему по принятию решений относительно типа услуг телекоммуникационной компании, позволяющую консультировать
- F1 = 6,5 кН; F2 = 5,0 кН; М = 2,0 кН·м; q =
- «Foodland» - самая большая сеть бакалейных магазинов в Гонолулу, состоящая из девяти больших магазинов
- Function F(n: integer): integer; begin if n>1 then F:=F(n-1)+G(n-1) else F:=2*n; end; function G(n: integer): integer; begin if n>1 then G:=G(n-1)+F(n) else G:=n-2; end;
- Function F(n: integer): integer; begin if n>1 then F:=F(n-1)+G(n-1) else F:=n+1; end; function G(n: integer): integer; begin if(n>1) then G:=G(n-1)+F(n) else G:=2*n; end;
- Function F(n: integer): integer; begin if n>1 then F:=F(n-1)+G(n-1) else F:=n+1; end; function G(n: integer): integer; begin if(n>1) then G:=G(n-1)+F(n) else G:=n-1; end;
- Function F(n: integer): integer; begin if n>1 then F:=F(n-1)+G(n-1) else F:=n; end; function G(n: integer): integer; begin if(n>1) then G:=G(n-1)+F(n) else G:=n; end;