Дано целое число N. Проверить есть ли оно числом Фибоначчи (через while) (C#)

Question

Информатика

Владилена

6 октября, 06:18

Дано целое число N. Проверить есть ли оно числом Фибоначчи (через while) (C#)

+4

Ответы (1)

Знаете ответ?

Яша · Answer 1

Как-то так:

var

A, B, C, N : longint;

Begin

Read (N) ;

A : = 1;

B : = 1;

while N B do begin

if B > N then break;

C : = A + B;

A : = B;

B : = C;

end;

if B = N then begin

WriteLn ('FK-1 = ', A) ;

WriteLn ('FK+1 = ', A+B) ;

end else WriteLn (N,' не является числом Фибоначчи, ошибка') ;

end.