mirror of
https://github.com/ruby/ruby.git
synced 2022-11-09 12:17:21 -05:00
fd81221a8e
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@11708 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
11 lines
201 B
Raku
11 lines
201 B
Raku
sub tak {
|
|
local($x, $y, $z) = @_;
|
|
if (!($y < $x)) {
|
|
return $z;
|
|
} else {
|
|
return &tak(&tak($x - 1, $y, $z),
|
|
&tak($y - 1, $z, $x),
|
|
&tak($z - 1, $x, $y));
|
|
}
|
|
}
|
|
&tak(18, 9, 0);
|