Matematické Fórum

Nevíte-li si rady s jakýmkoliv matematickým problémem, toto místo je pro vás jako dělané.

Nástěnka
22. 8. 2021 (L) Přecházíme zpět na doménu forum.matweb.cz!
04.11.2016 (Jel.) Čtete, prosím, před vložení dotazu, děkuji!
23.10.2013 (Jel.) Zkuste před zadáním dotazu použít některý z online-nástrojů, konzultovat použití můžete v sekci CAS.

Nejste přihlášen(a). Přihlásit

#1 13. 06. 2011 17:30

Clown
Zelenáč
Příspěvky: 18
Reputace:   
 

Pascal - řetězec

Zdravíčko, dostal jsem úkol (opět)

Vytvořte aplikaci, která na vstupu přijme od uživatele řetězec v maximální délce 255 znaků a na výstupu jej vrátí zrcadlově obrácený.

problém je že jsme se to ještě neučili ale stejně to po nás p. učitel chce...

pomůžete mi prosím nějak?


Když se to zasekne, pomozme tomu silou. Když se to ulomí, stejně to tam nemělo co dělat.
Kdo neumí, učí. A kdo neumí učit, učí tělák

Offline

  • (téma jako vyřešené označil(a) Dana1)

#2 13. 06. 2011 17:47 — Editoval jindra (13. 06. 2011 17:47)

jindra
Příspěvky: 78
Reputace:   
 

Re: Pascal - řetězec

Pomůžu, nedám ti přímo zdroják ale řeknu jak na to.

Vytvoříš si dvě proměnné (o délce 255 znaků/string) a proměnou integer.
Načteš do první proměnné vstup.


Pak projdeš první proměnnou od konce a budeš dávat do té druhé proměnné od začátku.
K jednotlivým písmenkům v proměnné přistupuješ jako v poli vstup[ID]


Tady je konkrétnější ukázka. Tohle vypíše pod sebe vstup. Předělat to tak aby si to uložilo a pak vypsalo celé zrcadlově už zvládneš :)

Code:

for i:= 0 to length(retez)-1 do
  begin
       writeln(retez[length(retez)-i]);
  end;

Offline

 

#3 13. 06. 2011 18:13

janca361
.
Příspěvky: 3284
 

Re: Pascal - řetězec

↑ Clown:
Rekurzivní řešení (jen jako ukázka, že to tak jde, u delší řetězů je to velmi pomalé, takže neefektivní)

Offline

 

#4 13. 06. 2011 23:22

Clown
Zelenáč
Příspěvky: 18
Reputace:   
 

Re: Pascal - řetězec

Děkuju lidi :) pohraju si, jsem rád že mi to vždycky hezky vysvětlíte, fakt díky moc :)))


Když se to zasekne, pomozme tomu silou. Když se to ulomí, stejně to tam nemělo co dělat.
Kdo neumí, učí. A kdo neumí učit, učí tělák

Offline

 

Zápatí

Powered by PunBB
© Copyright 2002–2005 Rickard Andersson