Torres de Hanoi

[disasterpiece]

Este código não foi feito por mim, mas é muito giro. É o prograna do conhecido jogo ''Torres de Hanoi''. 😉

Program torreHanoi;
uses wincrt;
var n:integer;

 procedure hanoi(n:integer;a,b,c:char);
 {mova n discos do pino a para o pino b usando o pino c como auxiliar}
 begin
   if n=1
   then writeln('mova o disco ',n,' do pino ',a,' para o pino ',b)
   else
   begin
     hanoi(n-1,a,c,b);
     writeln('mova o disco ',n,' do pino ',a,' para o pino ',b);
     hanoi(n-1,c,b,a)
   end
 end;

begin
 read(n);
 hanoi(n,'A','B','C')
end.

[sergiopinto]

Bom programa!  😉

[_4ndr3]

A interacção com o utilizador está fraca.  🙂