Mutual recursion: Difference between revisions

Content added Content deleted
(+ AutoHotkey)
m (→‎{{header|AutoHotkey}}: Minor indentation and casing edit)
Line 151: Line 151:
{{trans|C}}
{{trans|C}}
<lang AutoHotkey>main()
<lang AutoHotkey>main()
Return
return


F(n)
F(n)
{
{
if (n==0)
If (n == 0)
Return 1
return 1 ;
else
Else
return n - M(F(n-1)) ;
Return n - M(F(n-1))
}
}
M(n)
M(n)
{
{
if (n == 0)
If (n == 0)
Return 0
return 0 ;
else
Else
return n - F(M(n-1)) ;
Return n - F(M(n-1)) ;
}
}
main()
main()
{
{
i = 0
i = 0
while, i < 20
While, i < 20
{
{
male .= M(i) . "`n"
male .= M(i) . "`n"
female .= F(i) . "`n"
female .= F(i) . "`n"
i++
i++
}
}
msgbox % "male:`n" . male
MsgBox % "male:`n" . male
msgbox % "female:`n" . female
MsgBox % "female:`n" . female
}</lang>
}</lang>

=={{header|C}}==
=={{header|C}}==