Вопрос задан 05.11.2026 в 11:34. Предмет Информатика. Спрашивает Гарманова Даша.

Pascal:
Числа Фибоначчи определяются по следующему закону: a₁=1, a₂=1, aₙ₊₁=aₙ+aₙ₋₁. Определить член Фибоначчи, который больше заданного числа Х.

Перейти к ответам

Ответы на вопрос

Отвечает Литвинова Ангелина.

Программа последовательно строит числа Фибоначчи, пока очередное число не станет больше \(X\).

Pascal:
program Fibonacci;
var x, a, b, c: longint;
begin
readln(x);
a := 1;
b := 1;
while b <= x do
begin
c := a + b;
a := b;
b := c;
end;
writeln(b);
end.

Похожие вопросы

Топ вопросов за вчера в категории Информатика

Последние заданные вопросы в категории Информатика

Задать вопрос