Valaki segít programozás feladatban?
Adva van egy egész szám (billentyűzetről beolvasva). Töltsd fel és írd ki a képernyőre az A egész számokat tartalmazó tömböt, melynek mérete N, melyben a Fibonacci számsor első N eleme található. (Fk:F1=1,F2=1,Fk=Fk-2+Fk-1,k=3,4,… ).
Ez egy olyan típusu feladat szmámomra amin el sem tudok indulni, legyen szíves valaki elmagyarázni, előre is köszönöm.
program fibonacci;
function fib(n:integer): integer;
begin
if (n <= 2) then
fib := 1
else
fib := fib(n-1) + fib(n-2);
end;
var
i:integer;
begin
for i := 1 to 16 do
write(fib(i), ', ');
writeln('...');
end.
Előző vagyok:(ez a jó)
var szam : longint;
function fib_rekurziv (i: longint) :longint;
begin
if i <= 1 then fib_rekurziv := 1
else fib_rekurziv := fib_rekurziv (i-1) + fib_rekurziv (i-2);
end;
begin
writeln ('Kerem adjon meg egy szamot!');
readln(szam);
szam := fib_rekurziv (szam);
writeln ('Az n. szam a sorozatban: ', szam);
end.
Kapcsolódó kérdések:
Minden jog fenntartva © 2024, www.gyakorikerdesek.hu
GYIK | Szabályzat | Jogi nyilatkozat | Adatvédelem | Cookie beállítások | WebMinute Kft. | Facebook | Kapcsolat: info(kukac)gyakorikerdesek.hu
Ha kifogással szeretne élni valamely tartalommal kapcsolatban, kérjük jelezze e-mailes elérhetőségünkön!