Здесь есть решение в Python, но в шк Pascal. Напишите решение для Pascal плиз. Или просто решение, или с помощью Excel. Даю 20 баллов.
В основу эффективного решения головоломки «Ханойская башня» положен алгоритм, суть которого сводится к следующему: для перемещения башни, состоящей из п колец, спервого стержня на третий мы должны решить чуть более простую задачу переместить на второй стержень башню, состоящую из п-1 кольца. После этого нижний диск с первого стержня перемещается на третий и повторно осуществляется перемещение башни из п-1 кольца, но уже со второго диска на третий. Таким образом, число ходов, необходимых для перемещения башни из л колец, равно удвоенному числу ходов, необходимых для перемещения башни из и-1 кольца, и ещё одному ходу. Используйте эту закономерность для вычисления числа ходов, необходимых для перемещения башни из 64 колец. Вычислите, сколько времени займёт такое перемещение, если считать, что на один ход требуется 1 секунда.
В основу эффективного решения головоломки «Ханойская башня» положен алгоритм, суть которого сводится к следующему: для перемещения башни, состоящей из п колец, спервого стержня на третий мы должны решить чуть более простую задачу переместить на второй стержень башню, состоящую из п-1 кольца. После этого нижний диск с первого стержня перемещается на третий и повторно осуществляется перемещение башни из п-1 кольца, но уже со второго диска на третий. Таким образом, число ходов, необходимых для перемещения башни из л колец, равно удвоенному числу ходов, необходимых для перемещения башни из и-1 кольца, и ещё одному ходу. Используйте эту закономерность для вычисления числа ходов, необходимых для перемещения башни из 64 колец. Вычислите, сколько времени займёт такое перемещение, если считать, что на один ход требуется 1 секунда.
More Questions From This User See All
Answers & Comments
function Hanoi(n: integer): uint64;
begin
if n = 1 then
begin
Result:=1;
exit();
end
else
begin
Result:=2 * Hanoi(n-1) + 1;
end;
end;
begin
writeln(hanoi(64));
end.