Задача А Число Фибоначчи это числовая последовательность,в которой первые два числа...

Question

Задача А
Число Фибоначчи это числовая последовательность,в которой первые два числа единицы,а каждое последующее равно сумме двух предыдущих.Дано натуральное число N(2< N < 2*10^9).Найти два ближайших к нему числа Фибоначчи.Одно из них меньше N,другое больше N.Вывести их в порядке возрастания. Входные данные:
В первой строке входного файла Input.txt содержится одно натуральное число N.
Выходные данные:
В выходной файл Output.txt вывести два ближайших к N числа Фибоначчи.

Answer 1

Var
 a,b,n:integer;
begin
 read(n);
 a := 0;
 b := 1;
 while b < n do
   begin
   b := a + b;
   a := b - a;
   end;
 write(a,' ',b)
end.

Comments

напиши ссылку на вк) вопрос есть)