Skocz do zawartości
Zaloguj się, aby obserwować  
dzastinn94

Potrzebuję pomocy. Gdzie jest błąd???

Polecane posty

Zadanie Rozmnażanie pantofelków

 

 

Był sobie pantofelek. Jak wiadomo, pantofelki rozmnażają się przez podział komórki. Aby pantofelek mógł się rozmnożyć (stworzyć drugiego pantofelka), musi minąć 1 dzień. Po jednym dniu dojrzewania, w każdym kolejnym dniu, pantofelek dzieli się i powstają z niego dwa pantofelki (jeden dojrzały, jeden niedojrzały).

Pierwszego dnia jest tylko jeden pantofelek. Drugiego dnia będzie też tylko jeden, gdyż pierwszego dnia był niedojrzały i nie mógł się rozmnożyć. Trzeciego dnia będą już istniały dwa pantofelki (jeden dojrzały i jeden niedojrzały), gdyż ten pierwszy się rozmnoży. Po czwartym dniu będą istnieć 3 pantofelki, po piątym 5, itd.

Zakładając, że pantofelki nigdy nie umierają, oblicz, ile będzie pantofelków po upłynięciu n dni.

 

Wejście

 

W pierwszej linii wejścia znajduje się jedna liczba całkowita d (1 <= d <= 100), która oznacza liczbę zestawów danych.

Każdy zestaw składa się z jednej liczby całkowitej n (1 <= n <= 45), oznaczającej liczbę dni, które upłynęły.

 

Wyjście

 

Na wyjściu należy dla każdego zestawu danych wypisać liczbę pantofelków po upłynięciu odpowiedniej liczby dni.

 

Przykład

 

Wejście:

4

5

6

7

8

 

Wyjście:

5

8

13

21

 

program Project1;

var d,n:longint;
function Fib(n:integer):longint;
begin
 if n=1 or n=2 then
Fib:=1
 else if n=0 then
Fib:=0
 else if n>2 then
Fib:=(Fib(n-1) + Fib(n-2));
end;

begin
 readln(d);
 begin
   	readln(n);
   	Writeln(Fib(n));
   	end;
 readln;
end.

Udostępnij ten post


Link to postu
Udostępnij na innych stronach

Zacznijmy od tego, że mieszasz zmienne globalne i lokalne.

Brakuje Tobie też pętli, w której bedą czytane kolejne elementy.

Jak poprawisz te 2 rzeczy i dalej nie będzie działało, to wtedy wgłebię się dalej czemu.

Udostępnij ten post


Link to postu
Udostępnij na innych stronach

Bądź aktywny! Zaloguj się lub utwórz konto

Tylko zarejestrowani użytkownicy mogą komentować zawartość tej strony

Utwórz konto

Zarejestruj nowe konto, to proste!

Zarejestruj nowe konto

Zaloguj się

Posiadasz własne konto? Użyj go!

Zaloguj się
Zaloguj się, aby obserwować  

×