Помогите пожалуйста

Приложения:

Ответы

Ответ дал: Aillianna
0

procedure F(n: integer);

begin

   if n < 3 then begin

       write(n);

       F(n + 3);

       F(n + 2);

   end

end;

begin

   F(-1);

end.


Вывод -121

Вас заинтересует