Obsah fóra www.hojko.com
Hľadať  •  FAQ  •  IP  •  Zoznam užívateľov  •  Karma  •  Závisláci  •  Registrácia
 Prihlásiť sa pre kontrolu súkromných správ  •  Prihlásenie






Pascal- pri pisani textu zobrazovanie ineho textu
Odoslať novú tému   Odpovedať na tému    Obsah fóra www.hojko.com -> Programovanie  
 Moje príspevky :: Zobraziť predchádzajúcu tému :: Zobraziť nasledujúcu tému  
Autor Správa
"J"
Light Professional
Light Professional


Pohlavie: Pohlavie:Muž
Stav: Odhlásený
Založený: 13.03.2007
Príspevky: 795
Bydlisko: format ce dvojbodka enter
Karma:  Odobrať Kladná karma Pridať

PríspevokZaslal: 22 Apr 2008, 21:59    Predmet: Pascal- pri pisani textu zobrazovanie ineho textu Odpovedať s citátom  

Potreboval by som, ako priblizne spravit (ak sa da) v Pascale, ze ked pisem nejaky text, zobrazuje sa mi iny text. podobne ako ked sa prihlasujem na forum, pri zadavani hesla zobrazuje hviezdicky, ja ale kazdy znak potrebujem nahradit inym
dufam ze sa chapeme

diky
Návrat hore
Zobraziť informácie o autorovi Odoslať súkromnú správu Zobraziť autorove WWW stránky
zaggi
Medium Expert
Medium Expert


Pohlavie: Pohlavie:Muž
Stav: Odhlásený
Založený: 04.02.2007
Príspevky: 111

Karma:  Odobrať Kladná karma Pridať

PríspevokZaslal: 22 Apr 2008, 22:24    Predmet: Odpovedať s citátom  

Kód:
var
  ch: char;
begin
  repeat until Keypressed;
  ch := ReadKey;
  if ch = #97 then
    writeln('zmackol si a')
end.

Keypressed sa nastavi na true ked zmacknes klavesu
Readkey ti vrati poslednu zmacknutu klavesu a nastavi keypressed na false, to je zhruba idea ... nemam odskusane, s pascalom som nerobil roky
Návrat hore
Zobraziť informácie o autorovi Odoslať súkromnú správu
neppo
Star
Star


Pohlavie: Pohlavie:Muž
Stav: Odhlásený
Založený: 09.06.2005
Príspevky: 650
Bydlisko: www.kzsk.sk
Karma:  Odobrať Kladná karma Pridať

PríspevokZaslal: 22 Apr 2008, 22:29    Predmet: Odpovedať s citátom  

Kód:
program klavesnica;
uses crt;
var i:integer;
    v:string;

begin
clrscr;

write('Zadaj vetu predpisanu vetu: ');
readln(v);

i:=0;

repeat
      readkey;
      inc(i);
      write(copy(v,i,1));
until (i=length(v));

end.
Návrat hore
Zobraziť informácie o autorovi Odoslať súkromnú správu Zobraziť autorove WWW stránky
Zobraziť príspevky z predchádzajúcich:    Časy uvádzané v GMT + 1 hodina
Odoslať novú tému   Odpovedať na tému    Obsah fóra www.hojko.com -> Programovanie
Strana 1 z 1

 
Prejdi na:  
Nemôžete odosielať nové témy do tohto fóra
Nemôžete odpovedať na témy v tomto fóre
Nemôžete upravovať svoje príspevky v tomto fóre
Nemôžete mazať svoje príspevky v tomto fóre
Nemôžete hlasovať v tomto fóre
Nemôžete pripájať súbory do tohto fóra
Môžete sťahovať súbory v tomto fóre


Powered by phpBB © 2005 phpBB Group, phpBB SEO, © Hojko 2004-2008

[ Vygenerované za: 0.1s ] :: [ 16 Queries ] :: [ 19,669 stránok za dnes ] :: [ Dnes DB: 346,646 ] :: [ Max DB: 2,334,336 Queries ]