Tvůrce webu je i pro tebe! Postav třeba web. Bez grafika. Bez kodéra. Hned.
wz

Články

Algoritmus

Tento algoritmus jsem napsal z dlouhé chvíle a dělá asi tohle... vezme určitý řetězec a zrcadlově ho obrátí. Tento algoritmus je velice jednoduchý a je napsaný v jazyce visual basic. Samozřejmě je využita možnost rekurze, která se zde docela hodí. Sice pomocí interace by byl tento algoritmus výrazně jednodužší, ale jak jste si již povšimli, tak dávám přednost rekurzím a když uvádím algoritmy ve kterých se objevují cykly tak jsou vesměs napsány pomocí rekurze.

Function prehod(ByVal text As String, ByVal zmen As _
String As String , ByVal pocet_znaku As Integer) As _ String
   If Len(zmen) >= pocet_znaku Then
    prehod = zmen & text
   Else
    zmen = zmen & Right(text, 1)
    prehod = prehod(Left(text, Len(text) - 1), zmen, _
    pocet_znaku)
  End If
End Function
vzhled & kód vytvořil Adam Vůjtek http://vujtas.wz.cz
2003-2008
hledat:
další část

Úvod Články Fórum MatFyz Linux Programy Fotky Jukebox Kontakt Odkazy

další část
další část další část