Номер числа Фибоначчи. Последовательность Фибоначчи определяется так:

ϕ0=0,ϕ1=1,ϕn=ϕn−1+ϕn−2
Дано натуральное число A. Определите, каким по счету числом Фибоначчи оно является, то есть выведите такое число n, что ϕn=A. Если A не является числом Фибоначчи, выведите число −1.

Ввод
Вывод
1)8
2)6

1)10
-2)1

Язык: С++

1)дюймовочка

2)змей горыныч (3 головы)

3)снегурочка(сделана из снега)

4)буратино (необычно длинный нос)

  var a,b,c,d: integer;

begin

writeln ('vvedite a');

  read(a);

writeln ('vvedite b');

  read(b);

writeln ('vvedite c');

  read(c);

writeln ('vvedite d');

  read(d);

if (a> b) and (a> c) and (a> d)  then writeln('samoe bolshoe chislo - a')

  else writeln('a ne samoe bolshoe');

end.

программа, выводящая на экран номер четверти координатной плоскости, которой принадлежит точка с координатами х≠0 и у≠0

  program 198;

var x,y: real;

begin;

readln (x; y);

if x> 0 and y> 0 then

writeln (1 chetvert);

end;

if x< 0 and  y> 0 then

writeln (2 chetvert);

end;

if x< 0 and  y< 0 then

writeln (3 chetvert);

end;

if x> 0 and  y< 0 then

writeln (4 chetvert);

end;

end.