Ciochu Napisano Maj 20, 2008 Zgłoś Share Napisano Maj 20, 2008 ma być to program który z wpisanego zdania przestawi litery. czyli wpisując komputer otrzymamy retupmok. z zapisem w tradycyjny sposób sobie poradziłem ale potrzebuje wersji rekurencyjnej. jesli ktoś sie zna na tym to byłbym wdzieczny gdyby to wytłumaczył dziekuje z góry :rolleyes: Link do komentarza Udostępnij na innych stronach More sharing options...
Toster Napisano Maj 20, 2008 Zgłoś Share Napisano Maj 20, 2008 http://pl.wikipedia.org/wiki/Rekurencja http://pl.wikipedia.org/wiki/Rekursja_ogonowa Always Dark<br /> Link do komentarza Udostępnij na innych stronach More sharing options...
Ciochu Napisano Maj 22, 2008 Autor Zgłoś Share Napisano Maj 22, 2008 program w wersji "normalnej" Program LITERY; uses crt; var slowo,podciag,slowo2:string; i,n:byte; dlugosc:byte; begin CLRSCR; writeln('wpisz slowo do zmiany'); readln(slowo); dlugosc:=length(slowo); n:=dlugosc+1; begin repeat n:=n-1; podciag:=copy(slowo,n,1); slowo2:= concat(slowo2,podciag); until (n=1) end; writeln(slowo2); readln; end. i próba stworzenia rekurencji Program LITERYrekurencyjnie; uses crt; var slowo,podciag,slowo2:string; i,n:byte; dlugosc:byte; function new (slowo:string; n,dlugosc:byte):string; begin n:=dlugosc+1; repeat n:=n-1; new:=concat(new+slowon,n,1); until (n=1) end; begin CLRSCR; writeln('wpisz slowo do zmiany'); readln(slowo); dlugosc:=length(slowo); write(new); writeln(slowo2); readln; end. prosze o pomoc. Link do komentarza Udostępnij na innych stronach More sharing options...
Toster Napisano Maj 22, 2008 Zgłoś Share Napisano Maj 22, 2008 1. Prosze uzywac tagow do kodu, np delphi 2. Prosisz o pomoc w czym ? zamiesciles dwa kody i chcesz pomocy, ale napisz moze co nie dziala albo co sie dzieje ? 3. Jesli chcesz aby ktos zrobil to za ciebie to polecam temat: http://forum.unit1.pl/index.php?showtopic=1835 Always Dark<br /> Link do komentarza Udostępnij na innych stronach More sharing options...
Polecane posty
Zarchiwizowany
Ten temat jest archiwizowany i nie można dodawać nowych odpowiedzi.