110 likes | 247 Views
Karakterl áncok. Páll Éva Boglárka. Ismétlés. Deklaráció var s: string ; Length(karlánc) Concat(karlánc 1 ,...,karlánc n ) Copy(miből,honnan,hányat) Delete(miből,honnan,hányat) Pos(mit,miben) Insert(mit,miben,honnan). Számok karakterláncá alakítása. str(szám, karakterlánc)
E N D
Karakterláncok Páll Éva Boglárka
Ismétlés • Deklaráció var s:string; • Length(karlánc) • Concat(karlánc1,...,karláncn) • Copy(miből,honnan,hányat) • Delete(miből,honnan,hányat) • Pos(mit,miben) • Insert(mit,miben,honnan)
Számok karakterláncá alakítása • str(szám, karakterlánc) • a számot karakterlánccá alakítja • a szám lehet egész vagy valós paraméter Pl: var n:real; s:string; ... n:=3; str(n,s)?; {s= ‘3’} ...
Karakterláncok számmá alakítása • val(karakterlánc, szám, kód) • a karakterláncot számmá alakítja • a kód paraméter jelzi, hogy sikerült-e az átalakítás • a kód kötelezően integer • ha az átalakítás sikereses volt akkor a kód értéke 0.
Példa: var s: string[10]; n, kod: integer; ... s:= ‘100’; val(s,n,kod); {n=100, kod=0} if kod<> 0 then write(‘az atalakitas sikertelen!’) ...
Példa: var s: string[10]; n, kod: integer; ... s:= ’10x0’; val(s,n,kod); {n=0, kod=1} if kod<>0 then write(‘az atalakitas sikertelen!’) ...
Feladat 1. • Olvassunk be egy nxn-es mátrixot, töltsük fel véletlen számokkal, majd egy stringbe tegyük be minden sor összegét. • Pl: n=3 1 0 5 6 7 2 4 3 8 => s: 1. sor osszege 6! 2. sor osszege 15! 3. sor osszege 15!
Feladat 2. • Olvassunk be egy stringet, adjuk össze a benne szereplő számjegyeket és írjuk ki ezek összegét. • Pl: s: Matyi 1998 december 3-án született => összeg: 1+9+9+8+3=30
Feladat 3. • Olvassunk be egy stringet, adjuk össze a benne szereplő számokat és írjuk ki ezek összegét. • Pl: s: Matyi 1998 december 3-án született => összeg: 1998+3=2001
Egyéb függvények: • ord(x)– az x karakternek megfelelő ASCII kódot • Pl: i:=ord(‘a’); i=97; • chr(x) – az x ASCII kódnak megfelelő karaktert • Pl: c:=chr(97); c=‘a’;
Feladat 4. • Írjuk ki az ASCII táblázatot !