Версия для печати темы
Нажмите сюда для просмотра этой темы в обычном формате
Форум «Всё о Паскале» _ Задачи _ Задача про кроликов
Автор: Prohoshii 18.04.2004 23:02
сколько кроликов получится от одной пары за год? при этом каждая пара дает приплод пару кроликов каждый месяц каждая пара становится готовой к воспроизводству в возрасте одного месяца
;) 
я начинаю путаться в цифрах может кто обяснит принцип или сколько хоть их получится
Автор: oleg309 18.04.2004 23:10
Это по математике или прогу надо? Не совсем ясно поставлен вопрос! 
По моему надо эту тему переместить..
Автор: oleg309 18.04.2004 23:11
А если прогу составить то давай свои мысли выкладывай! Что не получается?
Автор: Prohosii 18.04.2004 23:43
Извините что рассердил 
просто по математики я посмотрел очень похоже на ряд Финабочи
но никак не могу понять их 144 или 233 получиться
а прогу я постараю сам составить если не получиться то снова приду
Автор: SKVOZNJAK 19.04.2004 1:16
Новорождённые кролики приносят первый приплод через 2 месяца? Тогда всё очень просто. Берём переменные А и Б и С. В А складываем исходных кроиков. В начале каждого месяца кроликов из С перекладываем в А, из Б в С, Б:=А. И так 12 раз, а потом кро-оликов сосчитать.
Автор: Prohosii 19.04.2004 2:22
Прошу извинить что вставляю 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;