Question

Количество различных чисел из 'n' чисел; числа только 5 и 9, но максимум 2 цифры подряд напнример(n=3; можно сделать такие числа :559; 599; 995; 959; 955; 595. Но нельзя 555 или 999, но можно 559955 или 995599 и т.д. например: вводится n(3) вывести(6)

Answer 1

Var
 a,b,n,i: integer;
begin
 read(n);
 a := 0;
 b := 1;
 for i := 1 to n do
  begin
  b := b + a;
  a := b - a;
  end;
 writeln(2*b)
end.