Решите на паскале . числа фибоначчи определяются как а(0)=1, а(1)=1, а(i)= a(i-1)+a(i-2). найти десятое число фибоначчи .найти : a)n-ое число фибоначчи б)сумму первых n чисел фибоначчи

program fibonachinums;

function fibn(n: integer): biginteger;

begin

  var (f1, f2) : = (biginteger(1), biginteger(1));

  for var i : = 3 to n do

    (f1, f2) : = (f2, f1 + f2);

  result : = f2;

end;

function fibsumn(n: integer): biginteger;

begin

  var (f1, f2) : = (biginteger(1), biginteger(1));

  var sum: biginteger;

  if n = 0 then sum : = 0

  else sum : = 1;

  for var i : = 2 to n do

  begin

    (f1, f2) : = (f2, f1 + f2);

    sum += f1;

  end;

  result : = sum

end;

begin

  println('десятое число фибоначчи: ',fibn(10));

  var n : = 100;

  writeln($'{n}-е число фибоначчи: ',fibn(n));

  println($'сумма первых {n} чисел фибоначчи: ',fibsumn(n))

end.

ответ:

объяснение:

запускаем 9минутные часы и 5 минутные часы одновременно.

переворачиваем 5 минутные часы, когда истечет 5 минут

переворачиваем 9 минутные часы, когда истечет 9 минут

переворачиваем 5 миунтные часы, когда истечет 10 минут

переворачиваем 5 минутные часы, когда истечет 15 минут

начинаем жарить омлет

заканчиваем жарить   омлет, когда 9минутные часы закончатся.