OINF-CLUB
Գլխավոր
Մուտք
Գրանցվել
Ուրբաթ, 22.11.2024, 06:58Ողջունում եմ ձեզ հյուր | RSS
[ Նոր հաղորդագրություններ · Մասնակիցներ · Ֆորումի կանոնները · Որոնում · RSS ]
  • Страница 1 из 1
  • 1
Модератор форума: TMNT  
ԴՐՈՇ (FLAGS)
oinf-clubДата: Ուրբաթ, 17.12.2010, 16:20 | Сообщение # 1
Կայքի հիմնադիր
Группа: Ադմինիստրատորներ
Сообщений: 19
Репутация: 10
Статус: Օֆլայն
ԽՆԴՐԻ ՎԵՐԼՈւԾՈւԹՅՈւՆԸ

forange(n) և fred(n) նշանակենք հնարավոր տարբերակների քանակը n-շերտանի դրոշը ներկելու համար, այն պայմանով, որ առաջին շերտը կլինի կարմիր կամ նարնջագույն: Ապա`
forange (n) = fred (n – 1) + fred (n – 2), forange (1) = 1, forange (2) = 1;
fred (n) = forange (n – 1) + forange (n – 2), fred (1) = 1, fred (2) = 1.
Եթե f(n)-ը հնարավոր տարբերակների քանակն է , ապա
f(n) = forange (n) + fred (n)
Քանի որ fred(1) = fred (1) = 1, forange (2) = fred (2) = 1, իսկ forange (n) և fred (n) որոշվում են նույն արտահայտություններով մեկը մյուսի օգնությամբ, ապա forange (n) = fred (n) = fn, որտեղ fn-ը n-րդ Ֆիբոնաչչի թիվն է: Այսպիսով f(n) = 2 * fn:
 
TamaraДата: Ուրբաթ, 17.12.2010, 16:37 | Сообщение # 2
Շարքային
Группа: Пользователи
Сообщений: 5
Репутация: 10
Статус: Օֆլայն
Ներկայացնում եմ իմ լուծումը Pascal լեզվով
Code
VAR N,I:LONGINT;
     F:ARRAY [1..31] OF LONGINT;
BEGIN
      ASSIGN(INPUT,'INPUT.TXT');
      RESET (INPUT);
      ASSIGN(OUTPUT,'OUTPUT.TXT');
      REWRITE (OUTPUT);
      READ(N);
      F[1]:=1;
      F[2]:=1;
      FOR I:=3 TO N DO
      F[I]:=F[I-1]+F[I-2];
      WRITELN(2*F[N])
END.
 
TMNTДата: Ուրբաթ, 17.12.2010, 16:41 | Сообщение # 3
Շարքային
Группа: Модераторы
Сообщений: 14
Репутация: 10
Статус: Օֆլայն
Իմ լուծումը C++ լեզվով
Code
#include <fstream.h>
void main()
{
  ifstream fin("input.txt");
  ofstream fout("output.txt");
  int n,a=1,b=1,c;
  fin >> n;
  for (int i=3;i<=n;i++)
  {
   c=a+b;
   a=b;
   b=c;
  }
  fout << 2*b << endl;
}
 
  • Страница 1 из 1
  • 1
Поиск:


Copyright Արամ Հովհաննիսյան © 2024