• Предмет: Информатика
  • Автор: levtikhonov04
  • Вопрос задан 2 года назад

procedure F(n: integer);
begin
write(n);
if n > 2 then
begin
F(n − 1);
F(n − 2);
F(n − 3);
F(n mod 2);
end
end;
Найти F(8)


Мартын05: что именно найти?

Ответы

Ответ дал: Turbikon
0

Ответ:

87654321012103210121432101210321010543210121032101214321012101654321012103210121432101210321010543210121032101210


levtikhonov04: Спасибо, но у меня есть просьба. Можете, пожалуйста. написать решение по-подробнее?
Turbikon: F(8) = 8 F(7) F(6) F(5) F(0)
F(7) = 7 F(6) F(5) F(4) F(1)
F(6) = 6 F(5) F(4) F(3) F(0)
F(5) = 5 F(4) F(3) F(2) F(1)
F(4) = 4 F(3) F(2) F(1) F(0)
F(3) = 3 F(2) F(1) F(0) F(1)
F(2) = 2
F(1) = 1
F(0) = 0
Turbikon: F(6) = 654321012103210121432101210321010
F(5) = 54321012103210121
F(4) = 432101210
F(3) = 32101
Turbikon: F(7) = 7654321012103210121432101210321010543210121032101214321012101
levtikhonov04: Спасибо.
Вас заинтересует