10 lines
115 B
Mathematica
10 lines
115 B
Mathematica
|
function Fn = female(n)
|
||
|
|
|
||
|
|
if n == 0
|
||
|
|
Fn = 1;
|
||
|
|
return
|
||
|
|
end
|
||
|
|
|
||
|
|
Fn = n - male(female(n-1));
|
||
|
|
end
|