с программированием (Паскаль) 1) написать функцию, считающую n-ый элемент последовательности Фиббоначчи. первые два элемента последовательности равны 1, а каждый последующий сумме 2х предыдущих

NastyTyan NastyTyan    1   27.10.2020 02:22    1

Ответы
kistina2 kistina2  26.11.2020 02:22

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.

Объяснение:

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика