Помогите с программированием (Паскаль)
1) написать функцию, считающую n-ый элемент последовательности Фиббоначчи. первые два элемента последовательности равны 1, а каждый последующий сумме 2х предыдущих
1) написать функцию, считающую n-ый элемент последовательности Фиббоначчи. первые два элемента последовательности равны 1, а каждый последующий сумме 2х предыдущих
More Questions From This User See All
Answers & Comments
Ответ:
var
x, y, i, n: integer;
begin
Write('Введите n = '); ReadLn(n);
x := 1;
y := 1;
for i := 2 to n - 1 do
begin
y := x + y;
x := y - x;
end;
WriteLn(n,'-ый элемент последовательности Фиббоначчи равен ', y);
end.
Объяснение: