;)
я начинаю путаться в цифрах может кто обяснит принцип или сколько хоть их получится
Полная версия: Задача про кроликов
сколько кроликов получится от одной пары за год? при этом каждая пара дает приплод пару кроликов каждый месяц каждая пара становится готовой к воспроизводству в возрасте одного месяца
;) я начинаю путаться в цифрах может кто обяснит принцип или сколько хоть их получится
;)
я начинаю путаться в цифрах может кто обяснит принцип или сколько хоть их получится
Это по математике или прогу надо? Не совсем ясно поставлен вопрос! 
По моему надо эту тему переместить..
По моему надо эту тему переместить..
А если прогу составить то давай свои мысли выкладывай! Что не получается?
Извините что рассердил 
просто по математики я посмотрел очень похоже на ряд Финабочи
но никак не могу понять их 144 или 233 получиться
а прогу я постараю сам составить если не получиться то снова приду
просто по математики я посмотрел очень похоже на ряд Финабочи
но никак не могу понять их 144 или 233 получиться
а прогу я постараю сам составить если не получиться то снова приду
Новорождённые кролики приносят первый приплод через 2 месяца? Тогда всё очень просто. Берём переменные А и Б и С. В А складываем исходных кроиков. В начале каждого месяца кроликов из С перекладываем в А, из Б в С, Б:=А. И так 12 раз, а потом кро-оликов сосчитать.
Прошу извинить что вставляю DELPHI но вот чтоу меня получилось
проверте кто-нибудь ПОЖАЛУЙСТА правильно это или нет
Var
x,rb,rb1,rb2 : integer;
rr_m : array[0..17] of integer;
begin
{} rb:=1;
rb1:=0;
rb2:=0;
rr_m[0]:=0;
rr_m[1]:=1;
for x:=1 to 12 do
begin
rb := rr_m[x-1] + rr_m[x];
rr_m[x+1]:=rb;
end;
form1.Edit1.Text:=IntToStr(rr_m[x]);
end;
проверте кто-нибудь ПОЖАЛУЙСТА правильно это или нет
Код
Var
x,rb,rb1,rb2 : integer;
rr_m : array[0..17] of integer;
begin
{} rb:=1;
rb1:=0;
rb2:=0;
rr_m[0]:=0;
rr_m[1]:=1;
for x:=1 to 12 do
begin
rb := rr_m[x-1] + rr_m[x];
rr_m[x+1]:=rb;
end;
form1.Edit1.Text:=IntToStr(rr_m[x]);
end;
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.