|
ru.algorithms
- RU.ALGORITHMS ----------------------------------------------------------------
From : Dmitriy Pilugin 2:461/214.777 08 Jan 2003 05:01:28
To : Arthur Martirosyan
Subject : Ханойские башни.
--------------------------------------------------------------------------------
29 декабря 2002г. (воскресенье), Arthur Martirosyan writes to Dmitriy Pilugin:
DP>> Program Honoy;
DP>> uses crt;
DP>> procedure hanoy(n:byte;s,m,e:string);
DP>> Begin
DP>> if n=1 then Writeln(s,'->',e)
DP>> else
DP>> begin
DP>> hanoy((n-1),s,e,m);
DP>> writeln(s,'->',e);
DP>> hanoy((n-1),m,s,e);
DP>> End;
DP>> End;
DP>> var
DP>> a,b,c:string;
DP>> Begin
DP>> clrscr;
DP>> a:='start';
DP>> b:='midle';
DP>> c:='end';
DP>> Hanoy(3,a,b,c);
DP>> End.
AM> Спасибо!
AM> А как оно работает?
Уже непомню :( на лекции давали. Рекуpсия.
AM> И нет ли у тебя исходничка с графикой?;)
нету соpи.
AM> Заранее благодарны!
Всего хорошего, Dmitriy Pilugin. (2:461/214.777)
--- GoldED 3.0.1-asa9.1
* Origin: Простой оригин, в котором ничего нет. ;) (Dima 2:461/214.777)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
