Of: Porovnání verzí
Skočit na navigaci
Skočit na vyhledávání
(Vytvorená stránka „Vyhrazené slovo of je použito v deklaracích typů pole, množina, soubor a v příkazech case. ;Syntaxe identifikátor =array[X..Y] of type identifikátor =set of...“) |
|||
Řádek 10: | Řádek 10: | ||
Příklady | Příklady | ||
− | + | { Deklarace pole } | |
− | + | type Seznam =array[1..100] of Integer; | |
− | + | Cetnost =array['A'..'Z'] of Byte; | |
− | + | Matice =array[0..9, 0..9] of real; | |
+ | { typ množina } | ||
+ | type | ||
Den =(Po, Ut, Str, Ctv, Pa, So, Ne); | Den =(Po, Ut, Str, Ctv, Pa, So, Ne); | ||
Znaky =set of Char; | Znaky =set of Char; | ||
Cislice =set of 0..9; | Cislice =set of 0..9; | ||
Dny =set of Day; | Dny =set of Day; | ||
− | + | { Deklarace typu soubor } | |
type | type | ||
Osoba =record | Osoba =record | ||
Řádek 28: | Řádek 30: | ||
SouborCisel =file of Integer; | SouborCisel =file of Integer; | ||
SwapFile =file; | SwapFile =file; | ||
− | + | { příkaz case } | |
+ | case Ch of | ||
'A'..'Z', 'a'..'z': WriteLn('Písmeno'); | 'A'..'Z', 'a'..'z': WriteLn('Písmeno'); | ||
'0'..'9': WriteLn('Číslice'); | '0'..'9': WriteLn('Číslice'); |
Verze z 29. 9. 2012, 22:36
Vyhrazené slovo of je použito v deklaracích typů pole, množina, soubor a v příkazech case.
- Syntaxe
identifikátor =array[X..Y] of type identifikátor =set of type identifikátor =file of type case výraz of <případ seznam příkazů>
Příklady
{ Deklarace pole } type Seznam =array[1..100] of Integer; Cetnost =array['A'..'Z'] of Byte; Matice =array[0..9, 0..9] of real; { typ množina } type Den =(Po, Ut, Str, Ctv, Pa, So, Ne); Znaky =set of Char; Cislice =set of 0..9; Dny =set of Day; { Deklarace typu soubor } type Osoba =record Jmeno : string[15]; Prijmeni : string[25]; Adresa : string[35]; end; SouborOsob =file of Person; SouborCisel =file of Integer; SwapFile =file; { příkaz case } case Ch of 'A'..'Z', 'a'..'z': WriteLn('Písmeno'); '0'..'9': WriteLn('Číslice'); '+', '-', '*', '/': WriteLn('Operátor'); else WriteLn('Speciální znak'); end;