Vyhledavc – Pascal – Fórum – Programujte.com

Cus all vsichni potrebuju udelat bohuzel pro vas zadarmo vyhledavc do programu aby kdyz do vyhledavace neco zadam a v tom programu to bude aby mi to ukazalo to co sem chtel nejakej vyhledavac jako je ve wincheatru chci jen zdrojak pls. :pc:

KUA-Spectrator napsal:

Cus all vsichni potrebuju udelat bohuzel pro vas zadarmo vyhledavc do programu aby kdyz do vyhledavace neco zadam a v tom programu to bude aby mi to ukazalo to co sem chtel nejakej vyhledavac jako je ve wincheatru chci jen zdrojak pls. :pc:

No bylo by to v pascalu a melo by to hledat v databazi programu př. dám do databaze dama prijde nejaky clovek zapne program a zada nazev dama tak aby mu ho ten nazev naslo.

Mam to chapat tak ze mas v databazy napr. 28 ziakov jednej triedy s ich menom, priezviskom a vekom.
A ty chces aby ten program vyhladal napr. vsetkych ludi s menom Martin?
:call:

Přesně tak to chci

Spravis si record(zaznam) ziaci, potom zadefinujes premenu ziaci typu pole ziakov.
Dalej budes uz len prehladavat..

type ziak=record

      meno,priez:string;

      vek:byte;

     end;

var ziaci:array[1..30] of ziak;

    a,b:integer;

begin

 writeln("Zadaj meno:"); 

 readln(name);

 Writeln("Najdute zaznami:");

 for a:=1 to 30 do

 if ziaci[a].meno=name then writeln("ziaci[a].meno");



  readln;

end.

      



 

ja to nepochopil ten kod co si mi napsal

V tom pripade asi bude nejjednodussi poridit si nejakou ucebnici Pascalu a naucit se ho. Doporucuju treba Pascal pro zelenace od pana Pavla Satrapy.

:rejza: Presne tak, ako vrai farundel.
Aj ja som ti to tam napisal. Ak tomu nepochopis radsej sa lepsie nauc zaklady programovania a ziskaj nejake algorytmicke chapanie.
Bud si najdi nejake navody na nete alebo knizku... A potom :pc:

To je hrozne, ti lide si uz dnes ani nedokazi optimalizovat svou signaturu, misto if ($kamos==true) echo "Respect !"; napis if ($kamos) echo 'Respect !';, tim se usetri par bytu, coz by pri projektu treba o velikosti 1 MB hodne usetrilo

To je hrozne, ti lide si uz dnes ani nedokazi optimalizovat svou signaturu, misto if ($kamos==true) echo "Respect !"; napis if ($kamos) echo 'Respect !';, tim se usetri par bytu, coz by pri projektu treba o velikosti 1 MB hodne usetrilo

Blbec napsal:
To je hrozne, ti lide si uz dnes ani nedokazi optimalizovat svou signaturu, misto if ($kamos==true) echo "Respect !"; napis if ($kamos) echo 'Respect !';, tim se usetri par bytu, coz by pri projektu treba o velikosti 1 MB hodne usetrilo